


SYSTEM EXERCISER EP-DRLPA-A-D ~ MAR 1978 


MbB-11-DRLPA-A COPYRIGHT ©77-78 d| ig} ital! 


os, Seema OER ES See 





‘SYSTEM EXERCISER -s«EP-DRLPA-A-DL =-/§ MAR 1978 


MD-11-DRLPA-A COPYRIGHT ©77-78 


FICHE 2 OF 2 MADEIN USA _ 





EOF 1D25PB0SEO1 00010000 780223 IDENT IF®ORTOOM1 1 
PRODUCT CODE: MAINDEC-11-DRLPA-A-D 
PRODUCT NAME: LPA-11 SYSTEM EXERCISER 
DATE CREATED: JAN. 1978 
COPYRIGHT 977, 1978 
DIGITAL E NT CORPORATION, MAYNARD, MASS. 
THIS SOFT S FURNISHED UNDER A LICENSE FOR USE ONLY ON A 
SINGLE C R SYSTEn AND MAY BE COPIED ONLY WITH THE INCLUSION 
OF THE ABOVE COPYRIGHT NOTICE. THIS SOF ANY OTHER 
COPIES T MAY NOT VIDED OR OTHE RWISE | MADE AVAILABLE 
TO ANY OTHER PERSON EXCEPT FOR USE ON SUCH eet ER A TO oNE WHO 
AGREES TO SE LICENSE TERMS. TIT LE TO AND OWNERSHIP OF THE 
SOFT AT ALL TIMES REMAIN IN 
THE INF T IN THIS DOCuMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. 


DEC_ASSUMES NO RESPONSIBI 


TY FOR THE USE OR RELIABILITY OF ITS 


LI 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC. 





HOR 1DRLPAASEG 


00010006 


780223 
SEQ 0001 








COl 


Page 2 


TABLE OF CONTENTS 


co cpcpeodD co aD cD aD aD N OOD vw £££ 6£ WWW for 


WONOWLWMU-O O -O WhO WhO fro fU-O OC 


ABSTRACT 

REQUIREMENTS 

EQUIPMENT 

STORAGE 

LOADING PROCEDURE 

+ ay 

NON-STANDARD ADDRESS, VECTOR 


STARTING PROCEDURE 
CONTROL SWITCH SETTINGS 
STARTING 


PROGRAM AND/OR OPERATOR ACTION 


OPERATING PROCEDURE 
ah Ten REGISTER FUNCTION 


PROGRAM AND/OR OPERATION ACTION 


ERRORS 
ERROR PRINTOUT 
RESTRICTIONS 
MISCELLANEOUS 
POWER FAIL 
XXDP, ACT, APT 
EXECUT Toh T TIME 
LPA-11 (SYSTEM) DIAGNOSTIC SUMM 
LPA-11 VER 18h mICRO-CO ERROR Y SUMMARY 
LPA-11 VER CRO co RR R LIST 
1) 4 RE ISTER DEFINITIONS 


MICRO-CODE P OGRAMS 
ILLEGAL INTERRUPTS ON PROGRAM START 


SEQ 0002 


2.0 


2.1 


2.2 


DO1 


Page 3 


ABSTRACT 


THIS PROGRAM DESIGNED TO EXERCISE T LPA-11XXx PERT EM. 
IS DIVIDED INTO TWO SECTIONS. THE F RST msec TON XERC S 5 Each 
INDIV HARDUARE Cc NT ON THE S NOTE THA HAT 
: Pa een 
eons ON F ka TECTS weosete 
p onb : THE secTION OF HARDUBRE THAT 
RUN 


pe? 
° ote I HE HA AD11K 
FAILED, THE USER SHOULD THE LPA/AD11K DIAGNOSTIC. ) 
T 


THE SECOND PAR THE D AGNOST Cc i DES 1GNE TQ, N WITH US R 
CKHC) MICRO_CO HIS IS FIRST (AND TIME THAT M8254 
CIPeM) I ARBITRA 10N LOGIC 1S CHECKED. Ae. aNY PROBLEHS 
Y Re Pact ts HA Coe EAL E” CoAT ee /beacs TOOTH THe UR US IN F ORDER 
VOU: RE i a8 Have oo, D etre” RET CABLE” FOR URIB us 1H oF 
GOOD SCOPE LOOPS ARE HARD TO COME BY SINCE THIS PROGRAM MUST TRY 
TO KEEP THREE PROCESSORS IN SYNC. 


REQUIREMENTS 


EQUIPMENT 


POP-11 FAMILY COMPUTER WITH 16K OF MEMORY (OR MORE) AND 
CONSOLE I/O FACILITIES (I.E. TTY) 


2. LPA-11X TO BE EXERCISED 
3. (OPTIONAL) KW11L OR KW11P (IMPROVES PROGRAM EXECUTION) 


STORAGE 
THIS PROGRAM OCCUPIES AND USES 16K OF MEMORY. 


NOTE 


IF 20K OR MORE MEMORY IS AVAILABLE HIS 
PROGRAM WILL RUN A/D SAMPLING A haxin IMUM 


SEQ 0003 


3.0 


3.1 


3.2 


EOl 
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LOADING PROCEDURE 


METHOD 


STANDARD PROCEDURE FOR NORMAL BINARY PROGRAM SHOULD BE_ FOLLOWED. 
XXDB, ACT OR APT: SUPPLIED ON MULTI-MEDIA AND CAN BE LOADED BY 


NON-STANDARD ADDRESS, VECTOR, CONFIGURATION 


THIS PROGRAM IS SET UP TO CHECK AN LPA-11X WITH STANDARD SET-UP 
AS LISTED BELOW. IT IS IMPORTANT THAT IF THE EQUIPMENT ADDRESSES 
VARY, THAT YOU ONLY CHANGE THESE LOCATIONS. 


TAG ADDRESS CONTENTS COMMENTS 


SBASE: 001250 170460 ;;BASE ADDRESS OF EQUIPMENT 
SVECT1: O01244 000300 ;; VECTOR LOCATION 


THE FOLLOWING ARE A LIST OF DEVICE ADDRESSES. YOU MAY CHANGE THE 
ADDRESS OF A DEVICE ONLY BY MODIFYING THE FOLLOWING LIST. DO NOT 
CHANGE ANY OTHER ADDRESSES! 


ADLIK: 1566 170400 3;AD11K ADORESS. 
KW11K: 570 170404 ;KW11K ADDRESS. 
DR1I1K1: 1572 187 ;OR11K #1 ADDR. 
AALIK: 1574 17041 ;AAL1 ADDRESS. 
AD11Ke: 1576 17044 ;ADLIK #e S 
OR11Ke: 1600 167760 ;OR11K 7 ADDRESS 
DR11K3: 1602 167750 ;DR11K #3 ADDRESS 
DR11K4: 1604 167740 ;OR11K #4 ADDRESS 
DR11K5: 1606 166730 ;OR11K #5 ADDRESS. 
ARL1: 1610 170400 ;AR11 ADDRESS. 
LPS11: l6le 170400 ;LPS11 BASE ADDRESS. 


SE@ 0004 


FOl 
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SR1 INFORMS THIS DIAGNOSTIC AS TO WHAT DEVICES ARE ON THE 1/70 
US. Rl O 1 KW11K AND 1 ADLIK IF YOUR CONFIGURATION 
IS DIFFERENT, YOU MUST CHANGE THIS LOCATION. 


WORD BIT=1 OCTAL DEVICE 


0 1ST ADLIK 

1 eater 18} KW11K 

2 000004 IST ORILIK 

3 000010 1ST BALIK 

: 500090 SND _DRIIK 

& 000100 RESERVED 

7 000200 DR11K 

g oo DR1IK 

P 001 TH DR1I1K 

12 B00 LPSAD Eps A/D) 

13 p1pee8 LPSKW (LPS REAL TIME CLOCK) 
14 040000 LPSVC (LPS D/A) 

15 100000 LPSOR (LPS DIGITAL J/0) 


SR1: 1562 003 ;DEVICE PRESENT FLAG DEFAULT 
31S 1 KW11K, 1 ADLIK 


SR2 INFORMS THIS DIAGNOSTIC AS TO HOW THE DEVICES SELECTED BY SR1 
ARE SET-UP_ FOR TEST. WHILE NO SPECIAL SETUP 1S REQUIRED TO RUN 
THIS TEST, THE DEPTH OF COVERAGE WILL INCREASE IF SPECIAL SETUPS 


ARE PERFORMED. 
WORD BIT=1 OCTAL FUNCTION 


00001 11K HAS WRAP-AROUND MODULE. 
g. ita BRiIK #1 Hae LOOP BACK CABLE 
3 00001 AALIK HAS TStLaY (VISUAL TEST). 
4 00: ADIIK #e AROUND MODULE. 
5 00004 DRI1K #@ ie L CABLE 
d DR11K L CABLE 
8 O04 DR11K #4 HAS L K CABLE. 
3 001000 ORI1K #5 HAS L BACK CAB 
10 002000 ARI1 HAS GSO34 WRAP AR . 
11 004000 AR11 HAS SCOPE DISPLAY (VISUAL TEST) 
14 040000 LPS-11 D/A HAS SCOPE DISPLAY (VISUAL TESt) 
1S 100000 + LPS-11 DIGITAL 170 HAS LOOP BACK CABLE 


SRe: 1564 0 ;DEVICE SETUP REG. 


SEQ 000s 


GOl 
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STARTING PROCEDURE 


CONTROL SWITCH SETTINGS 


BEFORE STARTING THE se inmate SET ALL SWITCH REGISTER BITS AS 
DESIRED, SEE SECTION S.1 


STARTING ADDRESS 
200 START OF TEST 


PROGRAM AND/OR OPERATOR ACTION 


a. 


&. 
3. 
4 


uw 


LOAD PROGRAM INTO MEMORY 
LOAD ADDRESS 200 
SET SWITCH REGISTER TO DESIRED SETTING 


SET UP LOCATIONS SRI: AND SRe: TO REFLECT THE SYSTEM 
CONFIGURATION. 


START PROGRAM 


SEQ 0006 


HO1 
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5.0 OPERATING PROCEDURE 


5.1 


S.e 


SWITCH REGISTER FUNCTION 


SWR BIT OCTAL FUNCTION WHEN SET 
1S 100000 T ON ERR 
13 St LOOP on Tes TES 
ma ac 
eee oe pees 
8 000400 RUN UN TEST SELECTED BY CF: 0 

SCOPE LOOPS 


io AN — ge +4 | ae oat on sn 3 Re HEN TH aartee 
NALT RROR,- Su TCH REG. BIT W" ri bor Ne 7 8+) AND 3 
FBP" E ti ibone ete MSHOuLD & 


(INH RROR’ OUT) Satin WR BIT 1 E 
CLEARED AND CPU SHOULD BE Be CONTI 


NOTE 


SR NOT REPERTIBLE OLE TO THE FACT THAT THREE 


Cae Se CPUS ARE RUNNING TO GENERATE THE 


SEQ 0007 


101 
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S.3 PROGRAM AND/OR OPERATOR ACTION 


i. 


WHEN THE PROGRAM IS INITIALLY STARTED IT WILL TYPE: 
MD-11-DRLPA-A 

THE FIRST “PASS” THROUGH THE PROGRAM IS QUICK VERIFY OR A 

SHORT ONE. OTHER PASSES WILL ITERATE ON EACH SUBTEST 

UNLESS INHIBITED. 

THE PROGRAM PERFORMS TESTS ON THE KMC11. 

THE PROGRAM PERFORMS TEStS ON THE M8200-YC AND MB2S4. 


THE PROGRAM TESTS EACH OPTION ON THE I70 BUSS SELECTED BY THE 
OPERATOR. 


THE PROGRAM LOADS USER MICRO-CODE INTO THE KMCII AND 
EXERCISES TOTAL LPAII-KX SYSTEM. 


PROGRAM END PASS. 


NOTE 


ON ALL EVEN PASSES THROUGH THE PROGRAM, THE 
tt oy: SELECTS re ee MICRO-CODE FOR USER 


MICRO CODE; AND ON ALL OD NUMBERED 
THE PROGRAM SELECTS DEDICATED MODE MICRO-CODE 
FOR USER MICRO-CODE. THE OPERA TOR | MAY INFORM 

THE PROGRAM TO ONLY RUN ON N OF 

USER-MICRO-CODE BY USE OF THE oNrTeH REGISTER 
(SEE SECTION 5.1 


SEQ 0008 


JOl 
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6.0 ERRORS 


6.1 


“ 
oO 


ERROR PRINT-OUT 


PRINTOUT VARIES WITH THE ERROR pe rec ieP. THE ERROR PC TYPED OUT 
IS THE ACTUAL LOCATION OF THE ERROR CAL 


THE FOLLOWING IS A LIST OF LABELS ASSOCIATED WITH LPALI 
FUNCTIONAL ERROR. 


TSTWD - TESt IN WHICH THE ERROR WAS DETECTED. 


USJNO - USER JOB NUMBER ASSIGNED TO THE JOB BY THE MICRO-CODE. 
ALPCO - LPA11 CONTROL OUT REGISTER CONTENTS. 
ALPCI - LPA11 CONTROL IN REGISTER CONTENTS. 
ALPSO - LPA11 STATUS OUT REGISTER CONTENTS. 
NOTE 
ERROR REPORTS MAY OR MAY NOT SPECIFY A 
IF S THAT DEVICE  IS_ NOT 
NECESSARILY THE FAULTY UNIT. HOWEVER, IT IS 
THE DEVICE UNDER TEST WHEN THE ERROR WAS 
DETECTED. FOR FURTHER INFORMATION, THE 
OPERATOR MUST CONSULT THE LISTING. 
RESTRICTIONS 


SEQ 0009 


KOl 
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SEQ 0010 


MISCELLANEOUS 


POWER FAIL 


THIS PROGRAM WILL NOT SUPPORT POWER FAILURES, IF A POWER FAILURE 
OCCURS, YOU MUST RELOAD AND RESTART THIS PROGRAM. 


XXOP, ACT, APT 


THIS PROGRAM IS CHAINABLE UNDER XXDP, ACT, OR APT. ALTOUGH “APT 
HOOKS” HAVE BEEN INSTALLED, THEY HAVE NOT’ BEEN TESTED. 


EXECUTION TIME 


THE EXECUTION TIME WILL VARY BETWEEN CPUS. EXECUTION. TIME ALSO 
VARIES WITH THE NUMBER AND TYPE OF OPTIONS ON THE LPA-11XX 
SYSTEM. THE APPROXIMATE TIMES ARE LISTED BELOW: 


1.0 E (60 SEC) -NO ERRORS-ITERATIONS INHIBITED 


-Q MINUT 
3.0 MINUTE (180 SEC) _-NO ERRORS-WITH ITERATIONS. 
(LISTED UNDER MIS.) 


‘a. 


LOl 
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8.4 LPALIL (SYSTEM) DIAGNOSTIC SUMMARY 


8.5 


8.5. 


DIAGNOSTICS FOR THE LPA11 ARE WRITTEN AT_THREE LEVELS: (1) TOTAL 
PDP-11 SYSTEM, (2) LPA11 SYSTEM; AND, (3) LPA11 OPTIONS. 


LEVEL 1, IS DESIGNED TO ISOLATE A FAILURE TO THE LPAL1 SYSTEM. 
ALL bpTtone ON THE PDP-11 ARE EXERCISED. 


Liven? PEOORLIES "PRATE,A FETRHRE JSr "Gy HOT Bib FLEE 


CAN GENERALLY TELL WHIC ve Peagee Ba DIAGN ayostie 
TF ¥E and oni Gn RAN niP*be ebbee nah DHeeMRaNs WEEN THEN. 
ARBITRATION ERRORS WILL NOT BE DETECTED BY THIS DIAGNOSTIC. 


Hi er pings. tes AID IN DE TEDATNING IF THE ERROR WAS IN 
TION THE DRLPA SPECIFIED. ™ -. MAY “LOOP” fo 


urTH IN LEVEL 
FIRST »REQU b grExt Thee Go THE 
; t tH S DO RCT a 
BIT aT THON, QUIRE EXTRA TIME FOR EXECUTION. THE SECOND 
ane REQUIRES THAT THE USER RECONFIGURE THE PDP-11 


SrSten, Mm Orns BRECONFIGURATION INVOLVES CABLING THE UNIBUS TO THE 


THE DIAGNOSTIC FOR THE M8254 FALLS INTO THE GROUP “B” CATEGORY. 


LPA1L1 VERSION 3 MICRO-CODE ERROR SUMMARY 


MICRO-C RR DFINED AS ANY ERROR RETURNED TO THE USER BY 
THE MIC O=CODE TH THRO! THE LPAL1 STATUS REGISTER. 


WITHIN of DIAGNOSTIC WE CHECK TO BE SURE THAT WE CAN GENERATE 


Son E OTHERS MAY COME UP AT ANY TIME WHILE THE 
PPAII-Xx X MICROCCODE oe BEING RUN. 


1 FATAL HARDWARE ERRORS 


tart eee tM OF DATA MR Te sree ne 
le € OF olen ries SUssvsten OR AOURING 6 Tie PROCE RR ING or 
. TRANSFERRED AND PALI part 


RESPOND TO ADDT TONAL TCOMMANDS. ROM THE POP-11 THE 
must oy RE-INTIALIZED PRIOR TO ACCEPTING ANOTHER COMMAND FROM rene 


THESE ERRORS MAY COME UP IF THERE IS AN ARBITRATION ERROR. 


SEQ 0011 


MO1 
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8.5.2 START REQUEST ERRORS 


THE START T_ ERRORS CONSIST OF ERRORS DETECTED BY ie MASTER 
DURING Fe PROCESSING 6 5 NEW PDP-11 COMMAND TO THE LPAL1 


8.5.3 USER REQUEST ERRORS 


RANT OCCU IL TR oe ar 


ier S50" ANB HPS ea) ries bbe fitcnoPiBoe§86n BN 


5 RF OR OR. WHICH THE ERROR AP APPL i s YDENTIFIED. BY" THE USER 
INDEX Ye6DE ore THE CONTROL OUT WORD aert is # 


8.5.4 NORMAL STATUS RETURNS 
HE NORMAL STATUS RETURNS ARE INDICATED BY ERROR 


Se Dea i ean ame Le 


aa stoi gpatig. 8 Oe et ane en, Mele "Se 
CIE AEcRS, Col SER Ue cl stu rh HE 


TION I 


PDP-11 HAS 
TSRBPFEORE oc tGnPRURTERORL IGE BUEEER-neobEsr "CRmoBEGE® ms 


SEQ OO0le 


NOl 


JMP+ROM READ TEST 
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SEQ 0013 
THE LPALI-KX DIAGNOSTIC KIT WILL INCLUDE: 
— —_ —,- DIAG. TITLE 
LPAL1-KXx LEVEL 2 MD-11-DRLPA LPAL1-KX SYSTEM 
mB2S4 “B" MD-11-DRLPN MB2S4 (IPBM) DIAG. 
AAL1-K a MD-11-DRLPB AALI-K DIAG. 
B MD-11-DZAAC AALI-K DIAG. 
AR11-K A MD-11-DRLPC LPA/ARI1 DIAG. #1 
A MD-11-DRLPD LPA/ARI1 DIAG. #2 
A MD-11-DRLPE LPA/ARI1 DIAG. #3 
B MD-11-DZARA AR11 DIAG. a1 
B MD-11-DZARB AR11 DIAG. #2 
B MD-11-DZARC QR11 DIAG. #3 
DR11-k Q MD-11-DRLPF LPA/DR11-K DIAG. 
B MD-11-DZORG DR11-K DIAG. 
KW11-K A MD-11-DRLPG LPA/KW11-K DIAG. 
B MD-11-DZKWK KW11-K DIAG. 
LPS11 A MD-11-DRLPH LPA/LPS11 DIAG. #1 
A MD-11-DRLPI LPA/LPS11 DIAG. #2 
A MD-11-DRLPJ LPA/LPS11 DIAG. #3 
B MD-11-DZLPC LPS11 DIAG. #1 
B MD-11-DZLPD LPS11 DIAG. #2 
B MD-11-DZLPI LPS11 DIAG. #3 
AD11-K A MD-11-DRLPK LPA/ADL1-K DIAG. 
B MD-11-DZADi AD11-K DIAG. 
Mg200-YC B MD-11-DRLPL LPA/MB200-YC BASIC 
MICRO-CPU R/W TEST 
8 MD-11-DRLPM LPA/MB200-YC 





B02 


Page 14 


8.6 LPA-11 VERSION 3 MICRO-CODE ERROR LIST 


SHRERRERRRERRREREREH FATAL HARDWARE ERRORS X44 HHH RHHH HEY RHRKEE 
322 --- OF NON-EXISTENT DEVICE 
LOW 


SL 
ei, == wal FIFO READ / WRITE ERROR 
ete «= I/ Sack Tine T 
INITIAL COND TION ERROR 


g 
BYTE & --- TED STATUS 
YTE 7? --- us 
344 --- MASTER 7 SL RSION ERROR 
E 6 --- MASTER VERSION NUMBER 
7 cD SF ION_NUM 
345 --- SLAVE COLD START TIME-OUT 
BYTE & --- 200 --- SLAVE FIFO READ / WRITE ERROR 
201 --- KW11-K CLOCK "A" OVERRUN 


202 --- SLAVE FIRMWARE FIFO SEQUENCE ERROR 
347 --- FPRTH DATA E 


6 VOLE 
LL DP ney ERPECT D VALUE 
350 --- pife et ERROR 


VALUE 
BYTE 7 --- EXPECTED VALUE 
ERREERELEERGRRERREREE START REQUEST ERRORS 442 XXHRRRHHHHRHREENE 





300 --- NO ROOM FOR REQUEST 

303 == MUCTIOUSER REQUEST ITH DEGTCATED MODE MICRO CODE LOADED 

304 DEDICATED ETH PER MULT T-USER MICRO CODE LOADED 

306 5 Mm WITH NO “INITIALIZE” 

310 MULT INITI “ 

312 ope R NOT ACIIVE 

314 IFTED FOR REQUEST DESCRIPTOR ARRAY 

316 fe 

329 & NOT IN CONFIGURATION 

35> FUNCTION SPECIFIED 

324 IN REQUEST RIP TOR ARRAY 

355 D FOR BUFFER OR USER STATUS WORD 

356 1/0 BUS DURING “INITIALIZE” COMMAND 
OF NON EXISTANT DEVICE 








SEQ 0014 


C0e 
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SEQ 0015 


RRRKRHERRRREREEREREEH USER REQUEST ERRORS £444 XHHKHRAE RRR RAEERE 
240 --- NON FATAL ERROR COUNT EXCEEDED 


241 --- ERROR STAT 
eve --- NON EXISTANT MEMORY IN RANDOM CHANNEL LIST 

sda —-- RON x8 Oy ERT NEM YT 

sue --- I HL ee R INDEX a Th a Eros w R status WORD 
2) = SAU y FRPP R AT AT 
a ~~~ RANDOM L ADDRESS UNDERRUN 


DATA UNDE RRUN 
2SS --- NON _EXISTANT CHANNEL OR DEVICE 
260 --- MULTIPLE EXTERNAL TRIGGER DIGITAL OUTPUT REQUESTS 


RHRMRRRERRRREEREEREEZE NORMAL STATUS RETURNS 44444 RHHRHHRRHERREES 
000 --- START REQUEST PROCESSED 


001 --- BUFFER FULL 
O52 --- BUFFER OVERRUN 7 UNDERRUN 
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8.7 LPA-11 (KMC-11) REGISTER DEFINITIONS 


THE CO CONTRO ty INFORMATION TRANSFERRED BETWEEN THE 
P 1 suesysTen IS STORED IN THE CONTROL 
Re SUGIvE REGISTER SO, HE Pg Tot esorrat Enea Se Ps 

MUL TIPOR ASHOOM BRE Ss MEMORY CRAM S) THE CSR 
LOCATIONS ARE ADDRESSABLE FROM EITHER THE PDP-11 OR THE M8204 
NICROPROCESSOR PROGRAM. THE UNIbUS ADDRESSES FOR bach CSR IS AS 


MASTER MICROPROCESSOR CSR 


6. SESE enn seinen ene 
0 (LOW) 76 XXXO —LPCI 1 
1 (HIGH) =. 76 XXX 1s MAIN 1 
2 (LOW) 76 XXX 2 —_LPCO 2 
3 (HIGH) 76 XXX 3. —LPSO 2 
4 (LOW) 76 XXX4 LPADL  3e 
S (HIGH) 76 Xxx § 4 
6 (LOW) 76 XXX 6 LPMSL 4 
7 (HIGH) 76 XXX 7 4 


SEQ 0016 


E02 
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CONTROL IN (BYTE 0) 


re CONTROL IN BYTE CONSISTS 0 

PDP-11 PROGRAM TO IN at I 
(BA=14 SUBSYSTEM. THE FORMA 
IS SHOWN ON FIGURE 8-1. 


F_8 BITS AT ADDRESS 76XxXx0 USER mI 
ATE THE TRANSFER OF COMMANDS TO THE 
T AND DESCRIPTION OF BYTE INFORMATION 


i (---------- BYTE 0 ---------- >! 

i i 

‘oe Re EOE A OE oe Be ADDRESS 

i7!'#e?isi4!3ste2ati1!0! 76xxx0 

240 a fae Ba Bie 
READY IN ------ Ee a al Me eel BIT 
IN INTERRUPT ++eee! i if beeeeeee UNDEFINED ROA EXT 
ENABLE : f oF MEMORY ADDRESS 
UNDEFINED --------------- cemenenen (BAL) 

~--------------- (BAL7) 
FIGURE 8-1 


CONTROL IN (BYTE O) 


SEQ 0017 
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DESCRIPTION 
ge a Ss IN TIAL CONDITION IS LOW (0). SET TO HIGH (1) 
-11 PROGRAM TO INDICATE THAT A VALID REQUEST 
BESCRIPT OR ARRAY  ( ) DRESS IS VAILABLE FOR 
PROCESSING BY THE LPA-11. _ CLEARED LOW .(0) BY THE 
R THE USER’S REQUEST IS 


MASTER  MICROPROGRAM AFTE 
ATED. 
READ - LPA-11 MICROPORGRAM 
WRITE - POP-11 PROGRAM 
NOT SPECIFIED 
BUS ADDRESS (BAl16,BA17) -_EXTENDED MEMORY BITS FOR 
neces! DESCRIPTOR ARRAY (RDA) ADDRESS (BYTES 4 AND S) 
READ_ - PDOP-11 PROGRAM 
WRITE - POP-11 PROGRAM 
NOT SPECIFIED (MST BE LOWO) 


IN INTERRUPT ENABLE - epi TIAL CONDITION IS LOW (0). 
SET GH (1) BY POP PROGRAM TO ENABLE INTERUPT 
REQUEST 1 Be NERA TED hi THE READY IN, BIT O7, IS 
HIGH (1) OR DURING A LOW TO hIGH TRANSITION. 
READ - POP-11 PROGRAM 
WRITE - PDP-11 PROGRAM 
AN INTERRUPT OCCURS AT VECTOR ADDRESS +4. A READY _IN 
I Y OCCUR EITHER IMMEDIATELY OR AFTER A USEC 
LAY. THE Lpa-ii WILL CAUSE AN OUT INTERRUPT OR OUT 
STATUS HE READY IN BIT IS SET IF BOTH ARE 


BEF 
PENDING SIMULTANEOUSLY. 


aaa IN - INTIAL CONDITION IS LOW O. SET TO HIGH (1) 
BY MICROPROCESSOR WHEN READY TO ACCEPT USER'S REQUEST. 
CLEARED LOW O AFTER REQUEST IS GRANTED. 


READ_ - POP-11 PROGRAM 
WRITE - MICROPROCESSOR 


SEQ 0018 
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MAINTENANCE (BYTE 1) 


THE MAINTENANCE BYTE IS AN EIGHT BIT, HIGH BYTE AT ADDRESS 76XxxX1 
WHICH CAN BE MONITORED BY THE PDP-11 PROGRAM, DURING DIAGNOSTIC 
FUNCTIONS. REFER TO THE PROGRAMMING SECTION OF THE KMC-11 
MAINTENANCE MANUAL FOR A DESCRIPTION OF THE “arts NOT DEFINED. 
FIGURE 8-2 SHOWS THE BIT CONFIGURATION ON THE MAINTENANCE BYTE. 
ey OO Ie Bee Oy PE A PE QDDRESS 
Pistiwwiizstiiauziariiuoigisa: 
ce er ee a ees 
RUN --------- i i i i i i === STEP UP 
i ‘ ‘ ‘ i 
RESET ------------ : | Sammons ROM 0 
CRAM WRITE ------------ : ~------------ ROM 1 
UNDEFINED ------------------ 9 +----------------- ENABLE 
ARBITRATION 


FIGURE 8-2 
MAINTENANCE (BYTE 1) 


SEQ 0019 


BIT 


8,9,10 
ll 


le,13 
14 


1S 


HO2 
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DESCRIPTION 


REFER TO KMC-11 MAINTENANCE MANUAL 


eo oe er OnE oo 3 a) nate “fh PROGRAM TO 
NON _PROCESSOR 


ag i "8, 5 aa BR BE IREEN I WHEE re cL PBRES 


THE ARBITRATION LogTe IS 
TNHI BT ITED. 
Reo? - POP-11 gaa AND MICROPROCESSOR 
iv = “11 
REFER TO KMC-11 MAINTENANCE MANUAL 


RESET - SET HIGH (1) BY_PDP-11 PROGRAM TO CLEAR ALL 
PERTINENT REGISTERS IN THE LPA-11 SUBSYSTEM. 


READ - LPA-11 MICROPROGRAM 
WRITE - POP-11 PROGRAM ONLY 


REFER TO KMC-11 MAINTENANCE MANUAL 


SEQ 0020 


es 102 
Page el 


CONTROL OUT (BYTE 2) 


THE CONTROL OUT BYTE_CONSISTS OF_8 BITS AT ADDRESS 76XxxX2 PND IS 
USED BY THE LPA-11 TO INDICATE TO THE POP-11 THE AVAILABILITY OF 
THE LPA STATUS INFORMATION. THE FOMAT AND DESCRIPTION OF THE 
BYTE INFOMATION IS SHOWN ON FIGURE 8-3. 


' 

§(---------- BYTE ---------- >! 

‘ : 

§’ wee cmoeoeeeeeeesoowoooeoooooooecece ‘ 

re Ff ¢ +. £ § $2 woe 

i7?ietstw¥igte2eti1:!o! 76xxxe 

i Mal OE SS “hake eae ee 
READY OUT ----- Py of ff. on ae Dee 
OUT INTERRUPT ++ee! n? bo s------- UIDO 0 
ENABLE ' ! 

bo Seen nnna--- UIDO 1 
UNDEFINED ----------- se 
FIGURE 8-3 


CONTROL OUT (BYTE 2) 


SEQ 0021 


BIT 


Page 22 


DESCRIPTION 


USER’S INDEX - AN OCTAL_ CODE (0-7) ASSIGNED BY _ THE 
MASTER MICROPROCESSOR IN THE MULTI REQUEST MODE TO 
JNDENTEEY THE STATUS AS RELATED TO UP TO EIGHT USER 


NOT SPECIFIED 


OUT _INTERRUPT  _ENABL . - SET HIGH (1) BY MASTER 
MICROPROCESSOR PROGRAM TO ALLOW AN INTERRUPT REQUEST TO 
PE — AT VECTOR +00 WHEN THE READY OUT (BIT O07) 


WRITE - PDOP-11 PROGRAM 


perOY outs - SET HIGH (1) BY THE MASTER Me peR nae 
ROGRAM ne THAT ag LPA-11 SUBSY wii HAS 
sraTus INFORMAT ION FOR THE POP-1 CLEARED LOW (OQ) BY 
THE -11 PROGRAM TO ACKNOWLEDGE THE RECEPTION OF THE 
UPA-11 STATUS INFORMATION. 


READ _- POP-11 PROGRAM 
WRITE - PDP-11 PROGRAM 


jo2 


SEQ 0022 


KO2 
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USER INDEX CODE 


a pOURER iN INDEX Is cir yED BY THE LPA-11 TO IDENTIFY THE 
Sra INFOMATI AS RELATED TO ONE OF EIGHT el 


REQUESTS. _THE R’S NOER TS AN OC C FORM O- 7 AND I 
REQUESTS. TO THE USER N BRODER FHat FHe REQUESTS ARE GRANTED 
THIS EFFECTIVELY PROV we A VAR roe INDEX TO IDENTIFY FURTHER 
COMMUNICATI WITH AN ASSOCIATED R. THE é x 

NOT VALID FOR FATAL by aie 3 E CONDE TO N LPA-11 WHICH 
EFFECT ALL ACTIVE USER’ FOR START REQUEST ERRORS WHICH OCCUR 
PRIOR TO ESTABLISHING THE NEW USER’S REQUEST. 


STATUS OUT (BYTE 3) 
THE STATUS OUT IS AN ost. HIGH BYTE AT ADDRESS 76XXX3_ WHICH 


BORER tae Esfase rstnenr’ Gr POSER REGUESTS. OR DURING THE TRANS ER 


SHOWN ON FIGURE 8-4. THE ERROR COD 
LE’ 8-1. 8-2 AND 8-3 ARE GROUPED AS SHOWN ON THE 
S OUT Bit Mc taltar tal. 


' ' : ' ' ' ! +  ! QDDRESS 
his! ay'isyat we@tar?1i0'9! 8! 76xxxe 
4. «fo sf Se i ae 
ERROR TYPE ---- } : : [ 0 
ERROR STATUS ------- i i i i -------- 1 
a J a J 
1 w----------- i i + ------------ 2 
] ] 
i +----------------- 3 
' 
eewowoowwoeocoowenn=---- 4 
FIGURE 8-4 


STATUS OUT (BYTE 3) 


SEQ 0023 


Lo2. 
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aaa aoe ron 
O18 —_-FORTREROBeF ines “THE ERROR CODE ENbIcaTeD BY THE ERROR 
STATUS O (BIT 14) AND ERROR STATUS 1 (BIT 


RITE - pA MASTER PAI GROPROCESSOR 


13,14 ERROR STATUS O AND 1 - INDICATES THE CONDITIONS FROM 
WHICH THE ERROR OR STATUS ORIGINATED 


RRITE - MASTER MICROPROCESSOR 


1S STATUS/ERROR_INDICTOR - A SINGLE BIT WHICH INDICATES 
STATUS OR FATAL_ERROR CONDITIONS wer we eR LAM 


A_HIGH (1) INDICATES AN ERROR AND A LOW 
STATUS. 


READ - PDP-11 PROGRAM 
WRITE - MASTER MICROPROCESSOR 
ERROR/STATUS CODES 
THE ERROR/STATUS CODES INDICATED BY THE STATUS OUT BYTE 3 ARE 
DEFINED AS FATAL HARDWARE ERRORS START REQUEST ERRORS, USER 
REQUEST ERRORS AND NORMAL STATUS RETURNS 


THE ERROR/STATUS CODES AS_LISTED ON sf COLL Sune TABLES INCLUDE 
ALL EIGHT BITS STARTING AT BIT O TO BIT 


SEQ 0024 


Page 2S 


REQUEST DEScRIPTOR ARRAY ADDRESS (BYTE 4 AND S) 


THE BUS ADDRESSES OF THE REQUEST DESCRIPTOR ARRAYS (RDA) IN THE 
PDP-11 MEMORY ARE CONTAINED ae te Nee ES 4 AND S OF THE ae. 


CSR. BYTE 4 AND S EACH gontoty pOe ES2 BITS (BADO-BAD7 
BA08-BAIS) AS SHON ON FIGURE g-5° AN BYTE O CONTAINS TWO ADDRES 
BITS (BA1& AND BAI7). 
’ 4 
#< oo-------- BYTE 4 ---------- >? 
——s . 2 eet eee 
'72?62?St*4t32?eae22i:0! 76XXx4# 
BAD? (--<-------0----------- BADD 
' H 
(enn n nnn BYTE S -------------- >! 
' 4 
‘tyee Ute Ged pad aa OR CE ES ADDRESS 
'31S!wmHt!izg!?ie?tir!:10!sa! 8! 7&Xxxs 
BAILS (----------------------------- BA0S 
FIGURE 8-S 
REQUEST DESCRIPTOR ARRAY ADDRESS 
BIT DEScRIPTION 
0-7 BAOO-BA07 - LOW BYTE OF THE RDA ADDRESS IN PODP-11 
MEMORY 


8-15 BAO8-BAIS - HIGH BYTE OF THE RDA ADDRESS IN POP-11 
MEMORY. 


SEQ 0025S 


NO2 
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MAINTENANCE STATUS (BYTE & AND 7) 


THE rae a BYTES 6 AND 7, ARE LISTED ON TABLE 8-6 
AND arora Me SPECIFIC STATUS AND ERROR CHECK VALUES 
ASSOCIAT fe) uy H THEE FA HARDWARE ERRORS DEFINED ON TABLE 8-e. 

Oe tne es e's. THE LOW AND HIGH 8-BIT ERROR STATUS CODES ARE SHOWN 


‘ 
Bf cxmreopeeneeeiees BYTE & ---------- > 
af 1_¢.?. 3). ¢ oem 
i7ieistwi3zgie2ati!o!f 76xxx6 
: 
i¢------------- BYTE 7 ------------- > 


] 
! ADDRESS 
$! = =7&XXX7 


FIGURE 8-6 
ERROR STATUS (BYTES 6 AND 7) 


SEQ 0026 





8.8 MICRO-CODE PROGRAMS 


ufouR PARAT MICRO- CODE PROGRAMS LOADED INTO THE KMC11 
DURING HE _ Co SE THIS DIAGNOSTIC. A BRIEF DESCRIPTION OF 
8.8.1 DORLPX1 

THIS IS THE FIRST MICROCODE PROGRAM LOADED INTO THE KMC11. ITS 
UNCTION IS TO VERIFY PROPER OPERATION OF THE KMC11 BOARD. IT 
AYEL PERFORM CRAM READ/WRITE TESTS, BRANCH TESTS, ALU TESTS, NPR 
TESTS, AND INTERRUPT TESTS. IF THE KMC11 IS FOUND TO BE FAULTY, 

THE BPERATOR MUST ABORT DRLPA AND RUN THE KMC11 DIAGNOSTICS 


8.8.2 DRLPXO 


THE MICRO-CODE PROGRAM “DRLPXO” IS LOADED INTO THE KMC11 AT_ THE 
ONSET OF TEST #3. _DRLPXO PROVIDES COMMUNICATIONS FACILITIES 
BETWEEN THE KMC11 AND THE SLAVE MICRO-PR T USED 
DURiNG TESTING OF THE SLAVE MICRO-PROCESSOR, THE IPBM, AND THE 
OPTIONS ON THE 1/0 BUS. 


' 8.8.3 USER MICRO-CODE 


RE ARE TWO SEPARATE ag MICRO-CODE PROGRAMS LOADED INTO THE 

KMC11 DEDICATED AND MULTI- USER. THEIR FUNCTION IN RELATION TO 

THIS “bracnostic IS TO EXERCISE THE OPTIONS ON THE I70 BUS. A 
BRIEF DESCRIPTION OF EACH FOLLOWS. 


DEDICATED MICRO-CODE 

THIS PROGRAM ALLOWS HIGH SPEED SAMPLING OF 74 DEVICES ON THE 1/0 
BUS. ONLY ONE JOB CAN BE RUN AT ANY GIVEN TIME. 

MULTI-USER MICRO-CODE 

WEN RUNNING ee Tr uae MICRO-CODE, ANY NUMBER OF JOBS FROM ONE 


Q EIGHT MAY BE RUN AT THE SAME TIME BY THE LPAl11 SUBSYSTEM. THE 
JOBS MAY BE DIGITAL INPUT, aD SAMPLING, AND/OR D/A CONVERSTIONS. 





SEQ 0027 


EE sss --e 


8.9 


CO3 
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ILLEGAL INTERRUPTS ON START 
SINCE THE Weaken TBSaLteE LIZED UNTIL TESt #1 IS_IN 
ESS D1 BPS HE POSSIBILITY THAT PREVIOUSLY LOADED 
IGRO-COOE AUSE A SSOR INTERRUPT. THIS WILL BE 


cee By ‘a “PROGESCOR PROALT AT THE KMCil INTR. VECTOR 


ee A TO CORRECT THIS ang THE ight + MUST ere 


gre Hec tht SOR aCe AatGLE Bree Mala Bi SERUEi ran Behd: Oh 


THE PROGRAM CAN THEN BE RESTARTED. 


SEQ 0028 


MAINDEC -1i- DRLPA-A 


ORLPA. 


ee Em 
OWL 


BUR Dw 


MWWy-OOWr- 
Or CNWOTWOOWN 


Pll 
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TABLE OF CONTENTS 


OPERAT i SWITCH SETTINGS 
R f R 

BAeic FY ITIONS 

APT 7eR BLOCK 

COMMON TAGS 


APT MAILBOX-ETABLE 
ERROR POIN 


TER TABLE 
Stlessestesctscrstetiantd 
aoe e ee ee ev ice art UP Rec 


PHVECRSVAVHLVERSERYARVORKE 
MM EEE EE EE EE RRR REERRRR REE E 


LPA-11 I70 BUS DEVICE ADDRESS DEFINITION AND LIST 
ME 0b 9-3 A 0 A a a a a a a HE HE 


TAGS 
R 
ITY OF THE KMC~11 


WRITE ONES TEST 
rg 3 ZEROES TEST 
EST 
T 
T 


es 
pom aera at 





£5 ZERO TRANSFER 
ae NeR TES ONES TRANSFER. 
T3 #T AVE _M PROCESSOR START 
PHASE 2 Pon? T arF RG. 
TY “#TEST DATA L BACK THROUGH IPBM,M82S4 MODULE 
PHASE 3 I/ s . 
TS 7 V T 2 11-K OPTION 
TS 7 Vv TEST-ADL1-K OPTION 
17 1/0 DEVICE TEST-KW11K OPTION 
T10 #TESt THE DRI1K OPTION, #1, IF “SR1" BIT 2=1(SET) 
Tl “TEST T 11k T 8g, F “SRI” BIT S=1(8 T) 
Tl “TEST T 1K TION, #3, IF “SRI” BIT 7=1(SET) 
Tl “TEST T 11K OPTION; #4’ IF “SRI” BIT 8=1(SET) 
T14 *#TEST THE DRIIK OPTION, #5. IF “SRI” BIT 9=1(SET) 
Tis “#TESt THE AA-11 OPTION, IF “SRI” BIT 3=1 (SET) 
Tl6 1/0 DEVICE TESt-ARI1 OPTION 


SEQ 0029 


E03 
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DRLPA.P11 


TABLE OF CONTENTS 


T17 170 DEVICE TEST-AR11 CLOCK OPTION 
Ted #TEST THE ARI1 DOI Ae TION, IF “SR1" BIT 10=1 (SET) 


Tel “TEST THAT THE ARI C oI Ay a 
T22 1/0 VICE T LPS- 1 As TION 
T23 170 DEV Toh -CLOCK OPTION 
Te4 “TEST THE L Y ob “SRI” BIT 1S5=1(SET) 
Tes “T st L 7A TION IF “SRI” BIT 14=1 (SET) 
T26 “TEST T LPS D/A CAN DISPLAY A SQUAR 
Te? St THAT THE AA & CAN DISPLAY 83 
T30 “xTESt THAT 7 Soe BE STARTED 
T31 #TESt FOR Cc 
T32 *#TEST THAT WE CAN Te ERROR CODE 314 
133 eT St THAT V ux CAN BE VERIFIED 
T3S “TRY T ERROR e506 316 
136 “TEST IN T 
137 “TEST THAT THE LPA-SYST K CAN BE STARTED 
T4O *TEST THAT THE MULT " “ WILL RCISE OR11K 
rib Hest That The mucTi-teen Gicee-S38e MILT Beeneter Bet it 
T43 “TEST THAT THE MULTI- M eRO-€ Witt BERET PRLIK 
T44 =—s- #TEST THAT THE TI-USER M CROC WI EXERCISE DR11K 
THS "T ST THe LPA RM c 2 IT Y tAKE S 
THB “TESt LPA TEM USER MICRO- ’ ILITY TO TAKE Ri 
Tu? “TEST THAT IJ CAN STARTED AND RUN 
TSO #HIGH SPEED A/D E TEST (DEDICATED MODE,SPECIAL TEST 
TS1 END OF TESTS 
EMtaky TOnccraL 
BANCERT GIRGRY CTO aECTRAL AND TYPE ROUTINE 
ERROR HAROLER ROUTINE 
ERROR MESSAGE TYPEOUT ROUTINE 
FF0PE fae UNE 
TY INPUT TI 
TYPE ROUTI 
READ AN OCTAL NUMBER FROM THE TTY 
APT COMMUNICATI ROUT INE 
POWER DOWN AND UP ROUTINES 

WIR ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. 
RAP DECODER 
TRAP TABLE 

"ASCIZ MESSAGES. 

OMOT -- DEDICATED MODE DISPATCH TABLE 


Ss 


SQUARE, SELECTED BY BIT 10 OF SR1,SR2 


E 
UARE, SELECTED BIT 3 IN SR1,SR2 


JOB 
S 


INGLE JOB 


SEQ 0030 


FQO3 
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DRLPA. MAC SEQ 0031 
1 -REM 
3 LPA. MAC 
S WELCOME, THIS DIAGNOSTIC IS ONE IN A SERIES OF DIAGNOSTIC 
6 DESIGNED IN ORDER TO a1) YOU IN TESTING THE LPA-11Xx OPTION. 
7 I HOPE THAT YOU HAVE fe80 THE DOCUMENTATION SECTION OF THIS 
g DIAGNOSTIC. IF YOU HAVE, YOU KNOH ABOUT ALL OF THE DIAGNOSTICS 
3 THAT ARE AVAILIBLE FOR TEStING THE LPA SYSTEM. 
14 GOOD LUCK ! 
13 [ 
14 -GLOBL DRLPx2 
16 
17 
18 
19 
20 
21 
22 
23 
34 
ES . 
Se : 
27 
28 
35 


OMOT 
ORLPA.P1 


GO3 
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000174 
000176 


000100 


000200 
000220 


000240 


oo0001 


ooco00 


oode40 
000137 


001100 


000011 


oooe00 o0000e 


002016 
O34S46 


041324 


1-AUG-77 13:16:41, EDIT BY BADGER 
DRLPA-A 
1977 
;*DIGITAL EQUIPMENT CORP. 
pares » MASS. 01754 
;*#PROGRAM BY EDWARD C. BADGER, GREGORY GLEZMAN 


;% 

TREE EEO ORRT AEE FFORUEREE FINE, COP upg RUROE. Sys 
$TN=1 

- SBTTL OPERATIONAL SWITCH SETTINGS 


5% SWITCH USE 

tH eee nnn nnn an ana 

;% 1S HALT ON 568 R 

;* 14 LOOP ON TES 

a 13 INHIBIT ERROR TYPEOUTS 

;* ll INHIBIT ITERATIONS 

3% 10 BEL a RROR 

;* 3 LO N ERROR 

5 8 LOOP ON TEST IN SWR<7:0> 
N' GBL 


. ENABL 
-SBTTL TRAP CATCHER 


-=0 
;#ALL UNUSED LOCATIONS FROM 4 - 776 conTert Oe a ial 


#SEGUENCE TO CATCH ILLEGAL TRAPS AND INTERRU 
; LOCATION Q. CONTAINS 6 TO CATCH IMPROPERLY LOADED VECTORS 
DISPREG: .WORD 0 ;;SOFTWARE DISPLAY REGISTER 
SWREG:  :WORD 0 !ISOFTWARE SWITCH REGISTER 

"WORD  104,200,2 

.=200 

IMP START 

=220 

IMP MAKEI 

.=240 

IMP RBUFR 


-SBTTL BASIC DEFINITIONS 
,*INITIAL SS OF THE STACK POINTER ### 1100 ### 


STacK= 110 

“EQUIV EMT,ERROR ;;BASIC DEFINITION OF ERROR CALL 
“EQUIV IOT;SCOPE ::BASIC DEFINITION OF SCOPE CALL 
; *MISCELLANEOUS DEFINITIONS 
HT= I1 ;;CODE FOR HORIZONTAL TAB 


SEQ 0032 


MAINDEC -11- ORLPA-A 
ORLPA.P11 


: B00 
79959 


88 

83 177774 
90 17777 
91 17757 
Se 177570 
93 

94 

3S 0000 
ae 900001 
3a alale ROS 
105 ooo004 

ae 

101 ate ne 
its iota 
104 date 
10S 

106 

tA 999900 
188 Boptd 
110 000140 
lll 000200 
lle 000240 
113 000300 
114 0340 
115 

116 

117 100000 
118 0000 
119 020000 
120 010000 
132 ppan8 
155 Boi 000 
le4 000400 
125 02: 
126 1 
le? 000040 
128 000020 
1e9 000010 
130 000 
131 oooode 
132 000001 
133 

134 

135 

136 

137 


MACY1L1 27(654) 


BASIC DEFINITIONS 


13-DEC-77 12:58 PAGE 3 
LF= le 
re 
= 

Sin tagact 
. EQUI S,PSW 
STKLMT= 177774 
ban = 177772 
DSWR= 177570 
DDISP= 177570 
-#GENERAL PURPOSE REGIST 
RO= %0 
Rl= %1 
Re= % 

= % 
RY= “4 
RS= %S 
R6= %6 
R7= %7 

= % 


03 


;;CODE FOR LINE FEED 
; ; CODE CARRIAGE RETUR 


BABES ERGRCBPRHDRE Beau LE FEED 
;;STACK LIMIT REGISTER 
33 PR Tee REQUEST REGISTER 
3 WARE SWITCH REGISTER 
3 DISPLAY REGISTER 


TER 
TER 
TER 
STER 
TER 
TER 


ER DEFINITIONS 


NE 
NE’ 
RAL 


; GENERAL 
See 
33 RAL 
ss RAL 
; | GENERAL 


BuRRRR RRA 
Ss 
SR Ree 


on 
eA 
+ 
m 
ps] 


3 


I 


BRVHBVBD 
i Oooo 
faba lata te ates 
Aaa aH 
<<<<<<<~< 
cc 
m 
Amman 
errrrrrr 


;#PRIORITY LEVEL DEFINIT 
et 
pRo= 180 
a: 28 
PRS= sao 
PR6= 300 
PR7= 340 
-*”*SWITCH REGISTER” SWITCH DEFINITIONS 
ifiee {90000 
SW14= 400 
SWi3= 20000 
SWle= 10000 
autas 3008 

= 
ay = Tbo0 
SwOS= 400 
SWO7= 200 
SWOb6= 100 
SWwOS= 4 
2 Y= 2 

3= 1 
WOe= y 
SWOl= ’ 

= 
-EQUIV SWOS,SW9 
- EQUIV ube al 
- EQUIV WO7 , SW 
-EQUIV SWO6, SWE 
EQUIV SWOS,SWS 


SEQ 0033 


03 
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DRLPA.P11 BASIC DEFINITIONS SEQ 0034 
138 -EQUIV SWO4,SW4 
139 [EQUIV SWO3,SW3 
et ‘Eauiy SWOT ’SHi 
ive BSuiV eon’ SWo 
144 -¥DATA BIT DEFINITICNS (BITOO TO BITS) 
14S 100000 BIT1iS= 1000 
146 040000 Bittas 40000 
147 020000 BIT13= e20000 
148 010000 BITl2= 10000 
149 004000 BIT1i= 4000 
iso 2000 BIT10= 2000 
el BBR sire: gee 

= 
153 30 Bt Toes 300 
154 000100 BITOb= 100 
155 4 BITOS= 40 
156 000020 BITOY= 20 
157 000010 BITO3= 10 
158 00000 BITO2= 4 
159 o00002 BITOl= 2 
160 000001 BITOO= 1 
161 -EQUIV 8IT09,81T9 
162 -EQUIV 2 TO8, 8178 
163 - EQUIV TO7,81T7 
164 : "EQUIV TO6; BITS 
165 - EQUIV TOS; BITS 
166 “EQUIV TO4’BiT4 
167 -EQUIV 1703, 8113 
168 *EQUIV T02;8ITe 
169 “EQUIV 1701, ITl 
170 “EQUIV BITOO;BITO 
172 -*BASIC “CPU” TRAP VECTOR ADDRESSES 
173 ooo0004 ERRVEC= 4 337 OUT AND OTHER ERRORS 
174 000010 RESVEC= 10 j RESERVED AND ILLEGAL INSTRUCTIONS 
175 000014 TBITVEC=14 ti"T" BI a 
176 000614 TRTIVEC= 14 jj TRACE TRAP 
177 000014 BPTVEC= 14 BREAKPOINT TRAP (BPT) 
178 000020 IOTVEC= 20 ::INPUT/OUTPUT TRAP (IOT) **SCOPE*# 
179 o000e4 cuavek® 4 8 b 
180 . 000030 EMTVEC= ::EMULATOR TRAP (EMT) *#*#ERROR## 
181 000034 TRAPVEC=34 ti"T TRAP 
182 000060 TKVEC= 60 ::TTY KEYBOARD VECTOR 
183 000064 TPVEC= 64 :i:TTY PRINTER VECTOR 
184 000240 PIRQVEC=240 ::PROGRAM INTERRUPT REQUEST VECTOR 
18S 170460 ABASE= 170460 
186 000300 AVECTI= 300 
187 000001 $TN=1 
188 .SBTTL ACT11 HOOKS 
190 25 RELKERRAAKREGRRREERKE RK RRA RK KA ALAR RR AA ARERR KAKA RA AAA HAA RA ARARAEE 
191 :HOOKS REQUIRED BY ACT11 


JO3 
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@RLPA.P11L ACTI11 HOOKS SEQ 0035 

192 000244 : $SVPC=. ;SAVE PC 

193 000046 .=46 

134 oo0046 030772 SENQAD ;;1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 

196 ooo00S2 9000000 ‘WORD O ;;2)SET LOC.52 TO zERO 

137 000244 > =$SVPC :} RESTORE PC 

199 001000 .=1000 

200 .SBTTL APT PARAMETER BLOCK 

e0e as KKKKKLKSRKRREKREKRREASERERERRERKRAKRARRKALS RAE RARAAKHAAAAAARARAERLEE 

203 :SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 

204 35 SHSKKRKKAKERREKKRERRKRERRRRRRRERERARKRRRRARERAARKAAAAARRAARALHEE 

20S 001000 .$X=.  ;;SAVE_CURRENT LOCATION 

206 000024 ‘= > :SET POWER Fart 0 pOINT TO START OF PROGRAM 

207 o00024 9O00200 2 >:FOR APT START UP 

=03 oooom $5083 sarfvon {BOHN 19 ger HeReR a Bos PTR 

9°, 

210 001000 .=.$X 5 i POUNT LScRTTON COUNTER 

ell 33 PEST TTT TCTOTT TIS TT TTT TTT TT TT TTT TTT TTT TT TT Titi tt titi titi iti tite. 

ele :SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 

sia : INTERFACE SPEC. 

21s THO: 

216 001000 oo0000 SHIBTS: .WORD O ;; TWO_HIGH BITs OF 18 BIT MAILBOX ADDR 

217 001002 001174 S$MBADR: .WORD S$MAIL ;;ADDRESS OF APT MAILBOX (BITS 0-15) 

218 001004 900002 STSTM: .WORD 2 :RUN TIM OF LONGEST TESt 

219 001006 000170 SPASTM: .WORD 120. ::RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

220 001010 000170 SUNItM: :WORD 120. > QNDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 

221 O0101le 000031 "WORD $ETEND-SMAIL72 ;;LENGTH MAILBOX-ETABLE (WORDS) 


KO3 
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DRLPA.P11 COMMON TAGS SES 0036 

334 .SBTTL COMMON TAGS 

E24 © 9G 36-3 HE HE HE HE HE HE HE HE HEHE HE HE HE HE HEE HEE HE HEHE HE HE HE HEHE EE EEE ERK E REL ES 

ees PE THIS TABLE pe) Of VARIOUS COMMON STORAGE LOCATIONS 

sss > #USED IN THE PROGRAM 

e228 001100 -=1100 

ee3 001100 SCMTAG: ;;START OF COMMON TAGS 

230 ete 000000 . WORD 0 

231 0011 000 STSTNM: .BYTE 0 ; ; CONTAINS Ms a TEST NUMBER 

S36 001103 000 SERFLG: .BYTE 0 33 CONTA LAG 

23 001104 000000 SICNT: .WORD 0 ; CONTAI ETETEST ITERATION COUNT 

234 Ba? 108 pees : .~WORD 0 CONTA ss 

235 1110 SLPERR: .WORD 0 ;;CONTA URN FOR ERRORS 

236 OOllle oo0000 SERTTL: .WORD 0 ;;CONTA 9 aL E ROLBYIE 

237 OO1114 000 site : .BYTE 0 ;;CONTA ITEM CONTROL 

238 001115 001 RMAX: .BYTE Z : CONT MAX. ERRORS 

239 001116 o00000 SE fs 0 ;; CONTA PC OF LAST ERROR TRSTRUCTION 

240 001120 o00000 $GD : WORD 0 ;; CONTA SS OF ’GOOD’ DAT 

e4 Oat ige pepe $8D: : .WORD 0 ;;CONTA ae SS OF ’BAD’ DATA’ 

e4 0011 0000 $GDDAT: .WORD 0 ;;CONTA *GOOD’ DATA 

243 0011 000000 : .WORD 0 5 5 SONTATIS _ DATA 

2Yy ll 000000 . WORD 0 ; ;RESERVED--NOT TO BE USED 

e4s ll 000000 .- WORD 8 

sis 1134 ooo TOB: .BYTE ; s AUTOMATIC iOS pNorEa 

sie Bat tae oo0nee SINTAG: B41 8 ;; INTERRUPT NDICATOR 

24g rete 177870 SWR: a DOSWR 33 OF aren GISTE 

250 114 177570 DISPLAY: . D0 ODISP ss OF DI AY gISTER 

251 OO1144 177560 STKs: 177560 s;I1TY K var 

eSe 001146 177562 STKB: 177562 5 sity 

253 001150 177564 STPS: 177564 sot 'Starus REG. ADDRESS 

See Bot tas 177586 Meg ty PR NTER ATaRac i, ss 
DO1154 NULL: .BY 0 ; ;CONTA has FILLS 

eS&6 001155 002 SFILLS: .BYTE 2 ;; CONTA Ne OOF chrvtac wk Eharec TEAS REQUIRED 

4 witttsg Bis sth LC: YT le ssl R TUL ¢ “LINE FEED” 

S8 ll STPFLG: .BYT 0 ss T Ina ave IL ul FLAG (BIT<O7>=0=YES) 

2539 001160 0000 STIMES: 3;MAX. NUMBER OF ITERATION 

260 001162 0000 SESCAPE: s3ES ON M ve AD 

261 001164 177607 000377 $BELL: .ASCIZ “oer <377><377> 3 3 CODE OR LL 

ebe 001170 077 $QUES: .ASCII ;QUESTION MARK 

e263 001171 015 SCRLF: .ASCII 1 } | CARRIAGE RETURN 

264 001172 ooo0! LF: IZ <le FEED 

26S ; Rit taeie tt fetta lll 

g66 ‘SSTTL APT MAILBOX-ETABLE 

cog ; -<) Seer ocean ston pcem nim 

270 001174 MAIL: ; APT AIL GCS 

271 001174 go0000 encety: .- WORD AMSGTY ; MESS TYPE CODE 

e7e 001176 oo0000 SFATAL: .WORD AFATAL ; j FATALE RROR NUMBER 

273 001200 o00000 STESTN: .WOR ATESIN 33 TEST NUMBER 

274% OO012e0e o00000 $PASS: .WOR APASS ;;PASS COUN 

275 001204 9000000 S$DEVCT: .WORD ADEVCT ;;DEVICE COUNT 





LO3 
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DRLPA.P11 APT MAILBOX-ETABLE SEQ 0037 





75 001 SUNIT: WORD AUNTT Hey NUMBER 

@ i et: ee a 

330 Baisis 3 Non eyte AENV tt BAVIRONHENT BYTE ~ 

581 001215 SENN: CBYTE ENVY. Haeney NODE BITS 

Sa BRIS BeckS: :HORB  BacnRe }iOseR ur teHes 

284 001222 o00000 SCPUOP: :WORD ACPUOP ea hs 

its 14764201 11/0S=02, 11/20=03, 11/40=04, 11/4S=05 
58a IT 10= seat Ti RE’ Choc 97,0210 

589 BIT =F TING Re ct oe PROCESSOR 

599 MORY MANAGEMENT 


— Sa Sy BYTE) 


i 

. 2 

= i 

$MAMS1: .BYT A 1 ; S)M.S. BYTE 
SMTYPI: [BYT AMTYP1 ie "ee 

; ¢ 

3% P CaR-002 
$ 









29S 
236 % 
297 001226 oo0000 MADRI: .WORD AMADR1 ;;HIGH 
5% : » i oa mi mL a8. oS eres, THIS WORD AND LOW OF “TYPE” ABOVE 
301 ogie31 oo0000 srives: Bre AAD i an T SS, BLK#e 
c 8 « 
302 001234 000 SmANS3: <BYT sel | tH ane he’ BYTe 
UU 3 . $$ . 
364 Bb SSE oooser Ra: BADR EL SS,BLK#3 
30S 001240 000 SMAMS4: .BYT AMAMSY ;:HIGH SS,M.S.BYTE 
306 001241 000 SMTYP4: .BYT AMTYPY btn. Fre key 
307 OOle42 oo0000 $MADRY: ; AMADRY 3:MEM 4 
308 ooieHs 000300 SVECT1: .WO AVECT ii IN TERRUBT ct BUS PRIORITY #1 
309 O01 00 SVECT2: :WORD CT i TERRUPT GRby Bus PRIORITY #2 
310 o01250 60 S$BASE: .WORD ABASE ‘BASE ADDRESS OF EQUIPMENT UNDER TEST 
311 001252 odo00000 SDEVM: (WORD ADEVM CE 
312 001254 oo0000 $CDW1: :WORD ACDWI ss DEVICE Mee DESCRIPTION WORD#1 
tame ShexTT 
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324 
338 
3e 
328 
328 001256 
330 
331 
332 
333 
334% 001256 
335 001260 
336 OO0lebe 
335 001264 
340 
341 001266 
oa, giseg 
4 9127; 
344 001274 
34S 
346 
47 
aie 
8 BBtSaa 
350 001302 
351 001304 
352 
353 
354 
355 001306 
356 001310 
357 OOl3le 
358 001314 
359 
360 
364% 001322 
oP 001324 
66 
367 


ERROR POINTER TABLE 


041620 
Oigeis 


O42S3 
042606 


042606 
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.SBTTL ERROR POINTER TABLE 


j ¥THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
ballon’ si TION hy 98 Ronee BY USING THE INDEX NUMBER FOUND IN 
HaLota ION SITEM. MBER INDICATES WHICH ITEM IN THE TABLE Is PERTINENT. 
; #NO S 0 THE ONLY PERTINENT DATA IS (SER 
ENOTES: EAC Ten In THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 
;% EM ;;POINTS TO THE ERROR MESSAGE 
1% DH :;POINTS TO THE DATA HEADER 
1a T 5 iP NTS T tHE 
i F t!POINTS TO ¢ ATA FORMAT 
SERRTB 
;ITEM 1 
EMI ;LPA-11 ADDRESS ERROR 
DH1 * ERRPC ADDRESS 
OT1 i SERRE KMADO 
DFO ALL NUMBER ARE IN OCTAL FORM. 
;ITEM 2 
EM2 ;LPAC(KMC-11) DATA ERROR 
DH + ERRPC xP’ REC’D 
DT  SERRPC, SGDDAT , SBODAT 
DFO :ALL NUMBER ARE IN OCTAL FORM. 
;ITEM 3 
EM iL PA (KMC-11) INSTRUCTION ERROR 
DH t ERRPC 
DT3  SERRPC 
DFO ‘ALL NUMBER ARE IN OCTAL FORM. 
;ITEM 44 
EM4 ;LPA (M8254) INIT.ERROR 
DH *ERRPC 
OT  SERRPC 
DFO :ALL NUMBER ARE IN OCTAL FORM. 
;ITEM 6S 
M4 PA (MB2 4, NIT. ERROR 
He RRPC D EC ED 
DT2 ic saoDAT $BDDA 
DFO ‘ALL NUMBER ARE IN OCTAL FORM. 
;ITEM 6 


SEQ 0038 





NO3 
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DRLPA.P11 ERROR POINTER TABLE SEQ 0039 
369 001326 041650 EMG ;LPA (M8254) SILO DATA ERROR 
ay GBs Giese Ps Heat, shock. sepdat 

LL . 

ze 001334 pasese DFO ;ALL NUMBER ARE IN OCTAL FORM. 
374 ;ITEM =? 

376 001336 041705 EM? ;LPA (M8254) FAST PATH DATA ERROR 
377 001340 O42261 DHe tERRPC xP? "ED 

378 00134¢ 042524 DTe : SERRPC, SGDDAT , SBDDAT 

323 001344 O42606 DFG tALL NUMBER ARE IN OCTAL FORM. 
381 ;ITEM 10 

383 001346 041747 EM10 ;LPA (AD11K) CSR ERROR 

384 001350 O42261 OH2 tERRPC EXP’ED REC’ED 

385 001352 o4e524 DTe ? SERRPC, SGDDAT , SBDDAT 

386 001354 o42606 DFO :ALL NUMBER ARE IN OCTAL FORM. 
388 ;ITEM 11 

390 1356 041776 EM11 ;LPA (KW11K) CSR ERROR 

391 OO Se8 042261 DHe tERRPC EXP’ED REC’ED 

392 001362 O42S5e4 OTe : SERRPC, SGDDAT, SBDDAT 

33 001364 O42606 DFO ‘ALL NUMBER ARE IN OCTAL FORM. 
335 ;ITEM 12 

397 001366 2025 EM12 ;LPA (DR11K) ERROR 

398 001370 O4e261 DHe :ERRPC EXP’ED REC’ED 

399 001372 O4eSe4 DT2 : SERRPC, SGDDAT , SBDDAT 
400 001374 O42606 DFO ?ALL NUMBER ARE IN OCTAL FORM. 
ide ;ITEM 13 

404 001376 oD0000 fh) ;NO-ERROR 13 (BAD LUCK!) 

40S 001400 o00000 0 
406 001402 o00000 0 

407 001404 900000 0 

m9 ;ITEM 14 
411 001406 o4e20S0 EM14 ;LPA (AA-11K) ERROR 
412 OO1410 O4e261 DH2 *ERRPC EXP’ED REC’ 

413 OO0141le O4e5e4 DTe ? SERRPC, SGDDAT , SBDDAT 

4i4 001414 O42606 OFO ‘ALL NUMBER ARE IN OCTAL FORM. 
ui6 ;ITEM 15 

418 001416 O42074 EMIS ;LPA-11 (ARL1K) ERROR 

419 001420 O4e261 DHe ER EXP’ED REC’ED 

420 O01422 O4e5e4 DT2 ? SERRPC, SGDDAT, SBDDAT 

uel 001424 O42606 DFO ‘ALL NUMBER ARE IN OCTAL FORM. 


MAINDEC -11- ORLPA-A MACY11_27(654) 


ORLPA. 
423 


Pll 


8686 8886 


8888 88a6 


001466 


poms 
o 
o 


Soorennaa & 


eed eed wed eed eed eed ed ed eed ed ed od 
j=] 


Bee0eg8eece 8G 


RO 


ERROR POINTER TABLE 


O4eS 
DYSEDE 


170460 


170461 
170462 
170463 
170464 
17046S 


13-DEC-77 


KMCSR: 


ADDRESS OF KMC-11 OF LPA-11 THE ADOR_FOR 


’ 
. 
’ 
. 
’ 
. 
, 
. 
’ 


;00 N 


WORD 


. WORD 
- WORD 
. WORD 
- WORD 


WORD 


16 


BO4 
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;LPA-11 (LPS-11) ERROR 


;ALL NUMBER ARE IN OCTAL FORM. 


,LPA-11 FUNCTIONAL ERROR 


;ALL NUMBER ARE IN OCTAL FORM. 


;ALL NUMBER ARE IN OCTAL FORM. 


;ERR 


sL PR FUNCT IONS. ERRO 
TSTNO 


R 
USJNO_ _USRDA 13a ALPCI ALPSO 


SERRPC, STACL” USJNO, USRDA, ALPCO Aen 


L AUMBER’ARE IN OcTAL F 


ATCH” THESE LOCA IONS 
:POCATIONS ARE ALTERED BY PROGRAM BASED ON YOUR INFO IN SBASE 


ABASE 


ABASE+1 
; ABASE+2 
ABASE+3 
ABASE+4 
ABASE+S 


OSV NOT =P BOONE SSeS As usep BY PROGRAM. 


KMADO MAY BE 

5 5 cm meriect 
REST OF THE ADDRESSES WILL 
BE CHANGED BY THE PROGRAM. 


;BASE KMC ADDR. MAY BE PATCHED BY USER. 


;>DO NOT <;KMC-CSR ADDR 
; PATCH «; 
;> THIS AREA ‘ 
;>DO NOT ‘ 


SEQ 0040 
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ORLPA.P11 
477 001502 
001S04 
479 001504 

4 
4g2 01816 
484 001512 


4 001514 
487 001516 


das 001SS6 
493 001560 


rw WUIUIUT UU 
PUTO ee ee 
CULWM-OWONCTU CW-OW 


wuwi 
Mitt 


001562 
530 


ERROR POINTER TABLE 
170466 
170467 
0300 
Bb0304 
ooo004 


ooco00 
000020 


000300 
000304 


000003 


CO4 
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KMADG: .WORD ABASE+6 ; PATCH < 
KMAD?: .WORD ABASE+7 ;> THIS AREA < 
VECTOR: .WOR AVECT18777 ;BASE_VECTOR OF KMC 
VECTPS: :WOR 4+AVECT 18777 :VECOTR ADDR. +2 
VERSN: .WORD 4Y ;CURRENT VERSION NUMBER OF MICROCODE. 
.DVLS: .WORD O ;/DEVICE LIST OF I70 ADDR. DEFINED 
-BLKW = 16. :/BY INIT. 
VECT1: .WORD AVECT1 
VECT2: .WORD AVECT1+4 
SBTTL KRERSRESKEKRERRESRHRRRRRAES 
SBTTL 1 Vv PRESENT REG 
SBTTL PEE ET TTT TEPPER EEE EE YE ES | 
.REM % 
1 INFORMS THIS DIAGNOSTIC AS TO WHAT DEVICES 
KW11K, AN AD1L1K 
Ft SEE dni 15 NOE FERE Nt YOU MUST CHANGE 
THIS LOCATI 
WORD BIT=1 OCTAL DEVICE 
0 000001 1ST ADLIK 
; 13t balk 
[BG Be 
! ADL Kee 
e Resenven 
? DRI1K 
8 0004 4TH DRIIK 
3 00 STH DR11K 
19 OO ry 
11 D040 RESERVED 
12 010000 LPSAD (LPS A/D) 
re B008 LPSKW (LPS REAL TIME CLOCK) 
A 
15 rateata tpaaR (tpe Bret TAL 3/0) 
% 
SRL: .WORD 003 ;DEVICE PRESENT FLAG DEFAULT 


:IS 1 KWL1K, 1 ADIIK 





SEQ 0041 


MAINDEC -11- DRLPA-A 
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001564 


wu 
eENoe 


ul 

NI 

o 
s{stst=tel=f=ts: 


23 

5¢ 
bee 
tJ 


SS aa 
BOR ERS 


uw 
a 
Oo 
Oo 


000000 


170400 
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SHELURKERHKHRHEKR EKER R ee 
SBTTL SHSRKKRKKRKKRHKKRHRAH SHES 
SBTTL SRe DEVICE SET-UP REG 
SBTTL SERRSKAHRKURKKSKRKKR RAKES 
. REM % 


S56 DEORE INES RIPQLOSTAE 88,045 TYE 


Hil FDO, SEF oh aBOW de, NRA "Oe "UECCTAE ZED 
AR ORMED. 


WORD BIT=1 OCTAL FUNCTION 
0 pooess 11K HAS GSO34 WRAP-AROUND MODULE. 
2 Boo 11K & Her OOP geri CABLE 
3 30 11K DI AY (VISUAL TEST) 
4 0000; AD11K #2 HAS G WRAP AROUND MODULE. 
Ss 00 11K as L K C E 
a 11K Li K & E- 
8 11K #4 L 
| 001 11K #5 LOOP K CABLE. 
10 00 AR11 HAS GSO34 WRAP AROUND MODULE. 
ll 00 AR11 HAS ae DISPLAY (VISUAL TEST) 
14 O04 Lee-tt Be HAS eh ISPLAY (VISUAL TEST) 
- 1S 10 LPS-11 DIGITAL I70 LOOP BACK CABLE 
SRe: . WORD 0 
SBTTL HE EE EH HE HEHE EH HEHE EH HEH HEH EE HEHEHE EE EE EE EERE S 
SBTTL LPA-11 I70 BUS DEVICE ADDRESS DEFINITION AND LIST 
SBTTL KEM LENE ERK ELE RELEASE EE DLE REEE KEKE ERK ER REE 
M% 
ihe FOLLOWING ARE A LIST OF DEVICE ADDRESSES. YOU MAY 
SHINES THE ADDRESS OF A peat ONLY BY MODIFING THE FOLLOWING LIST. 
00 NOT CHANGE ANY OTHER SES! 
ADIL1K: .WORD 170400 ;AD1L1K ADDRESS. 
KWLLK: .WORD 170404 ;KW11K ADDRESS. 
OR11K1: .WORD 167770 ;OR11K #1 BRer- 
AALIK: .WORD 170416 ;AAR11 ADDRESS. 
etins: - WORD 170s pO HK as piston StS 
BRT iKS: WORD 1p 3785 > ORI1K 3 APRE Se: 
DR11K4: .WORD 167740 ;DR11K #4 ADDRESS. 
OR11KS: .WOR 167788 ;DR11K BS BQQRESS 
ARL1K: .WOR 170400 ;AR11 ADDRESS. 
LPS11: .WORD 170400 ;LPS11 BASE ADDRESS 


SEQ 0042 


eH 
38 


MA 
DRLPA. 


BBONEN LW OB VN 


CCOUUMUUUUIUIUIUIUIUIUTIUTUTUT 
88888 88888 


oO 
_ 


oon 


oo 
OwOONON fww-ODe GRR & 


TUT ee ee O00 


COO rroo 
_ 


SERReN 


C -11- DRLPA-A 


Pll 


o 
Oo 
_— 
o 
— 
<= 


arora 
roo 


B88 888 
con 
ERO enw 


ooo 
ooo 
areas 
coo 
nae 
MoO 


001674 
001676 


170400 
170402 
170440 
170442 


170416 
170420 


167740 
167744 
167742 


167730 
167734 
167732 


170404 
170406 


MACY11 27(6S4) 


. REM 


STREGI: . 


KWADRO: 
KWADR 1: 


13-DEC-77 


E04 


ERLE RERREELLLKE ARE RAR LALLA ALARA RA LAL AALRER ALAR ERE 
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$ 
END OF PATCHABLE DEVICE ADDRESSES. 
-SBTTL AD11-K ADDRESSES 


170400 
170402 
170440 
170442 
. SBT 
170416 
1 


170426 


-SBTTL DRI1K 
167770 
16777044 


167770+2 
-SBTTL ORII1K 
167760 


167760+4 
167760+2 


-SBTTL DORIIK 
ie?750 
167750+4 
167750+2 
-SBTTL DORI1K 
167740 
167740+4 
167740+2 
-SBTTL ORII1K 
7730 


1 
167730+4 
167730+2 


-SBTTL KWI11K 
170404 
170406 


;CONTROL AND STATUS REGISTER. 


;ADDRESS OF BUFFER REG. AND 
;OIGITAL OUTPUT REG. 


;AD11K #2 CSR 


-ADLIK #2 OUTPUT/ INPUT 
TL AARL1-K ADDRESSES 


;AALIK CSR 
#1 ADDRESS 
;DRI1K #1 

: 

, 


#2 ADDRESS 
;OR11K #2 


eres &) 


#S ADDRESS 
;DR11K #5 CSR. 
;DR1L1K 

;DR11K 


ADDRESS 
;CLOCK A CSR 


QUTPUT REG. 
INPUT REG. 


K OUTPUT REG. 
REG. 


INPUT 


K OUTPUT REG. 
REG. 


INPUT 


K QUTPUT REG. 
REG. 


INPUT 


OUTPUT REG. 
INPUT REG. 


;CLOCK A PRESENT REG. 


SEQ 0043 


FOY 
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ORLPA.P11 KW11K ADDRESS SEQ OO44 
639 
buG 001700 170430 KWADR2: .WORD 170430 ;CLOCK A COUNTER REG. 
b4 001702 170432 KWADR4Y: .WORD 170432 ;CLOCK B CSR 
bus 001704 170434 KWADRS: .WORD 170434 ;CLOCK B PRESENT REG. 
Bue 001706 170436 KWADR6: .WORD 170436 ;CLOCK B COUNT REG. 
p48 .SBTTL AR11 ADDRESSES 
650 
651 901719 170400 ARADS: .WORD 170400 ;A/D STATUS REG 
652 17l2 170402 ARAD! “WORD 170402 7D BUFFER 
653 001714 170404 RCS: :WORD 170404 ; CLOCK STATUS 
654 001716 170406 cB: =: 170406 L k BUEFER/PRESET 
Bee poisse tooats ARXB; “WORD 19042 DISPLAY, STATUS 
pes 891385 15b4t9 5 “ORD 170414 :¥ R 
658 001726 170416 ARCC [WORD 170416 *CLOCK COUNT REG. 
660 
bb! .SBTTL LPS-11 ADDRESSES 
663 1730 170400 LPADSR: .WORD 170400 sA/D STaTU 3. 
ees B0i73e 17oiGe LpebeR: “HORS 17BdDe iA’ BUETER REG: 
bbG 001736 170406 KBR: “HORB 1704 *CLO BUF REG 
667 O01 17041 LPIOSR: - 170410 :170 STATUS REG 
668 001742 170412 LPIOIR: .WORD 170412 :170 INPUT REG. 
669 001744 170414 tO eR: - WORD 170414 :170 OUTPUT REG. 
670 OO1746 170416 POASR: : 170416 :07A STATUS REG 
671 001750 170420 LPDAXR: - WORD 170420 :D/A X RE 2 
67 001752 170422 PDAYR: ; 170422 :D/A Y REG 
Ya MISC. STORAGE LOCATIONS 
676 001754 oD0000 MYTEMP: .WORD 0 ; TEMP STORAGE 
677 : a30080 USJNO: - WORD = ; USE Cee NUMBER CIN R FLASH) 
6 1 ALPCI: : 0 ‘CONT OF CONTROL IN REG. 
680 1764 o00000 ALPCO: [WORD O ; CONTEN CONTROL OUT REG. 
681 001766 O00000 ALPSO: [WORD 0 : CONT 1 Spr HIGH BYT OF ABOVE, (STATUS REG) 
682 901770 000000 PADL: :WORD ° :CONTENTS OF ADDR. RE 
683 00177 000 003 SVERSN: .BYTE 3 :CONTAIN UCODE SYMBOLS 
684 001774 oD0000 TAXING: :WORD 0 
B85 001776 oo0000 ERCNT: {WORD 0 ;NO OF ERRORS. 
687 ;TO BE KW11P ADDR. OR NO ADDR. AT ALL 
689 
630 000073 STPCOD=73 
691 000074 LOPC=74 


692 000007 VBM=7 


ale A “i DRLPA-A 


DRLPA 
693 
6 


? 
708 


a yt he 
ONOUS WO 


NNNNNNNNNNNSY 


ore 


eect 
1>oe08 


000000 
000100 
000104 
000000 


oe 
RRS 


BR 
fr 


[oeed apd ced aed ant ed a od 
gag 
N 


MACY11 27(654) 
LPS-11 ADDRESSES 


mae 


8 
E 


= 
nee 


RS 
2 


a 
NNN 
NN 


GO4 
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USWH=7 
KWL1L: .WOR 17788 ;ADOR. OF KW11 
KWL11P: .WOR 17254 ADDR. OF KW11 
NOCLK: .WORD CLKTMP ;ADDR. OF NO CLOCK. 
CLKTMP: .WORD OQ 


; VECOTR OF KW1IL 


KWVECL : -WORD 100 
VECTOR OF KW1IL 


KWVECP: .WORD 104 


FUDGE: .WORD O FUDGE FACTOR 
START: 
.SBTTL INITIALIZE THE COMMON TAGS 
;;CLEAR THE COMMON nTAG, escnTAG) ARE 
MOV i "SERA LOCATION TO on CLEARED 
CLR 33C MEMORY LOCATIO 
CMP si ; ; DONE’ 
” SLOOP BACK IF 


NO 

::SETUP THE STACK POINTER 
NOV ite 5 VECTOR FOR SCOPE ROUTINE 
v th EM VECTOR FOR ERROR ROUTINE 


MOV ue rs ? 

MOV Pe TNESvE oiChve REP VECTOR FOR TRAP CALLS 
MOV ee ti 

Mov egPHADN, fag SV OHIER (FAILURE VECTOR 


; }CeveL 


8 
CLR STIME + NIT R oc ARGR ROORE 
ie He ite Rese ati 


MOV 
sp INITIA ce A Feu 
MOV eat aeiory 


mov PoGRESS FOR SCOPE 
;;SIZE FORA if ITCH willie IF as ag IT IS 
: EQUAL 9 A = oan TUP FOR A + R. 

mov #64S SEERRVEC 4 We, EFRON E 


HOV a0 isp DISPLAY Hs footer WRECISTER 
NE ob 4h TE RO TIMEOUT. TRA 


bys: HOV Bees, (SP) | BEancH TEAMOR TIMEOUT SWR IS NOT = -1 


65S: MOV sSUREG SHR ;;POINT TO SOFTWARE SWR 
ry REG, DISPLAY 
66S: MOV (SP)+,a"ERRVEC ;;RESTORE ERROR VECTOR 


CLR SPASS ;;CLEAR PASS COUNT 
BITB SAPTSIZE, SENVM p5 That USER SIZE UNEP APT 
BEQ 67$ ;;YES,USE NON-APT SWITCH 

ars MOV #SSWREG, SWR ::NO,USE APT SWITCH REGISTER 


SEQ 004S 


MAINDEC -11- ORLPA-A MACY11 


ORLPA.P1L1 

sr 
ae 

548 Bosse9 
ca poeesg 
? 555 
7$3 002300 
754 
786 002302 
5 306 
a — 002314 
i oe 
5ee 
763 
764 
765 
7e8 002336 
vee Ooee 
76 002 
770 
77 ae 
77 BS 3e4 
773 O02 
774% O02374 
77S 002400 
aA | 04 
7 10 
77 y 
77 2 
780 002430 
at 36 
7 4Yy 
783 
784 
78S 
ree Reese 
7 
7 
oag rae 
73 
7 002506 
7394 1 
> 002516 
7 
798 002534 
733 
800 od02eS4e 


INITIALIZE THE 


000 
ee 
Ses % 
SNS 
8888 
pera 


S88 


ae 


000 
pareve 
Bes 
N 

AS 
arr 
ooul 
rs 


010037 001642 


27(6S4) 


001SS6 
001SS6 


001860 


001616 


13-DEC-77 
COMMON TAGS 


18: 


HOY 
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Krag Fa 


© nein 
1$ 


.DVLS 


SVECT1, VECTI 
#170000, VECT1 


VECTAavgcTe 


SEQ 0046 


aes ASE KMC-ADDR. 

OF ADDR. LIST 
STOR FE ROOF 
;UPDATE ADDR. 
;DONE WHOLE LIST? 


;GET YECTOR ADDR. 


: THE FOLLOWING SECTION OF CODE SETS UP DEVICE ADDRESSES 
;BASED ON DEFAULT 
3 "ADI 1K™ THROUGH “LPS11 


eS ane! 
#2, ADAC 


KW11LK,R 
0 


ie 
Steely 


-_ ORIAL 
22: Bava 


DR11K2,RO 
RO, ORCR2 


OR11K3,RO 


OR OPERATOR MODIFIED DATA IN LOCATIONS 


;FIX ADL1K’S ADDRESS 


;FIX KW11K ADDRESS 


;FIX DR11K #1 ADDRESS 


;FIX DR11K #2 ADDRESS 


;FIX DRI1K #3 ADDRESS 


TO4 
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DRLPA.P INITIALIZE THE COMMON TAGS SEQ 0047 
801 002546 010037 O01 bse MOV RO, ORCR3 
802 O0eSSe 010037 001654 MOV RO, DROAS 
803 ni 001656 MOV RO, ORIAL 
804 000004 00165 
000002 16S 


ADD #4, DROAS 
ADD 


0025 062737 #2, DRIAS 


807 1 1604 MOV DR1iK4,RO ;FIX DRI1K #4 ADDRESS 
808 1 1660 MOV RO, ORCRY 

1 1662 MOV RO; DRORY 
gi? ig bee? erate 001662 AOD RO DROBY 
gle oesess 0627. 000002 001664 ADD #2, DRIAY 
814 13 001606 MOV DR11KS,RO ;FIX DR11K #5 ADDRESS 
81S 1 001666 MOV RO, ORCRS 
816 00264 10037 001670 MOV RO; 
817 46 1 1672 MOV RO; DRIAS 
B18 O04 001670 ADD #4; DROAS 
81 7 001672 ADD #2; DRIAS 
g5t 1 1574 MOV AAL1K,RO ;FIX AALIK ADDRESS 
Bee hiss z3 yea po teed MOV RO, AACSR 
B54 bostos Bt apt tca Mov RO BACT 
= Bisse Bole ny BB 
826 B555 08 1 1836 MOV : 
Be? 6 001626 ADD #2’ DACO 

001630 ADD #4; DACI 

829 001632 ADD 
830 000010 001634 ADD #10,DAC3 
83¢ 1 001 MOV D1 1K RO ;FIX SECOND AD11K’S ADDR. 
8 1 B01 MOV RO, STREG2 
834 O02 1 001622 MOV RO, ADAC2 
B35 002762 062737 OO00002 001622 ADD #2; ADACe 
837 002770 013700 001610 MOV AR11K,RO ;FIX ARL1 ADOR. 
838 ooe774 1 001710 MOV RO, ARADS 
839 00 1 001712 MOV RO; 
840 3004 1 001714 MOV RO, ARCS 
841 io Ol 001716 MOV RO, ARCB 
g42 4 O1 1720 MOV RO, 
843 1 1722 MOV RO; ARXB 
844 1 17 MOV 0, YB 
84S 1 17, MOV RO; ARCC 
846 O00: 7 001712 ADD #2° ARADB 
B47 7 001714 ADD #4; ARCS 
48 001716 ADD #6’ ARCB 
849 Of 10 001720 ADD #10, 
850 003064 7 le 001722 #12, ARXB 
851 003072 062737 OO00014 001724 ADD #14) ARYB 
Bb¢ 003100 062737 OO00016 001726 ADD #16; ARCC 


LPS11,R0 ;FIX LPS-11 ADDRESSES 


@ 
uw 
<= 
8 
WwW 
rans 
w 
oO 
_ 
WwW 
N 
8 
8 
ro 
o 
ro 
it) 
°o 
<= 


8 


JO4 


NDEC -11- ORLPA-A MACY11 27(654) 13-DEC-77 12:58 PAGE 18 
PA.P11 INITIALIZE THE COMMON TAGS SEQ 0048 
855 003112 010037 001730 MOV RO, LPADSR 
856 OO3116 O1 001732 MOV RO; LPADB 
857 0031 1 001734 MOV RO; LPCKSR 
0031 ] 001736 MOV RO, LPC 
ge9 0031 1 001740 MOV RO,LPIOSR 
860 0031 1 001742 MOV RO; LPIOIR 
Bb! Oo314e Q: BOL z44 MOV RO, LP 
i i 501 HOV RO’ EPDARR 
Sea 138 1 Bo tses MOV RO, LPDAYR 
865 1 001732 ADD 2? LPAD: 
B66 1 001734 ADD #4; LPCKSR 
B67 7 001736 ADD #6;L 
1 1740 ADD #10,LPIOS 
869 18 le 001742 ADD #i2,LPIOIR 
870 14 001744 ADD #14;LPIOOR 
87 Bass 4 60868 001746 ADD #16,LPDASR 
001750 ADD #20; LPDAXR 
87 001752 ADD #22’ LPDAYR 
ta 00 37 002014 CLR FUDGE 
876 
Ere SRE! QUET? ugers coma MOY SUDRIERRVEC GFELSUEEROR PING PUT TF NO saat 
873 373% 002006 o40624 nov KW1IL, RTCCSR ?MUST BE HERE,RECORD ADDR. 
881 76 Bier? 093320 oo00004 10S: nov we0S  ERRVEC ; SET UP FOR TINE-QUT IF NO KWLIP 
835 10 013737 basoos 040624 mov KWLIP,RTCCSR MUST BE HERE,RECORD ADDR. 
Bc O1g7a7 004 O40624 20S: MOV NOCLK, RTCCSR ;NO CLOCK! OHOH. 
886 0127 1100 SOs: MOV aSTACK, SP +RESTORE STACK 
887 003332 012737 000006 o00004 #6, ERRVEC tRESTORE ERROR VECTOR. 
Bea Bosaue Bisee7 Buoele toeuse OY SERENE eee SET UP CLOCK VECTOR. 
891 .SBTTL TYPE PROGRAM 
g2 ;;TYPE THE NAME OF THE PROGRAM IF FIRST PASS 
893 003354 = 27 177777 NC y $36 RST TIME? 
Bac 003362 104401 003430 OBE 69S HH SPE ASCIZ STRING 
896 .SBTTL GET VALUE FOR SOFTWARE SWITCH REGISTER 
832 05338 Etat oooo42 rst gue FORE We NING UNDER XXDP/ACT? 
B99 1 372? 001214 oo0001 cnPe SENV, #1 FORE We RU NING UNDER APT? 
1 as 023787 001140 000176 CHP SHR, #SWREG $3 SOFT ‘ pSUITCH REG SELECTED? 
393 aia 1 406 GTSHR ans ::GET SOFT-SWR SETTINGS 
305 093420 112737 000001 001134 708: MOVB #1, SAUTOB ;;SET AUTO-MODE INDICATOR 
307 003426 o00422 5 R $ -;GET OVER THE ASCIZ 


B 68 
33698: .ASCIZ <CRLF > #MD-11-DRI.PA-A LPA-11 DIAGNOSTIC #<CRLF> 


tle ta DRLPA-A 


DRLPA.P 


) 
2? 


he ee 
OONTU SWe-O 


0 6035 WODWWNDDWWW 


324 


00S037 
005037 


o000 O000 =p=+ =| 
ee ee ee 


000403 


104001 


062706 


012637 
012637 
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001776 
001514 


ooo004 
003626 
000006 
000340 
oooo00 
175656 
17S656 
175656 
17S656 


000004 


000006 
000004 


KO4Y 
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SWITCH REGISTER 
68S: 
CLR ERCNT 
RSTART: 
CLR .DVLS 
5 Pee ee eee TN TNE AODRESSARL ITY OF THE KMC-ll 
thE #TEST THE ADDRESSABLITY OF THE KMC-11 
j :EeCHOReneeaannaenanuneeKONRONREEEOEEOR ERE HOCHOE EE EaE MENA 
“MOV #5 ,STIMES ;;D00_ SO ITERATIONS 
MOV  SLPADR ::SET SCOPE LOOP ADDRESS 
MOV raed NM 
MOV #1, STESTN 
MOV #1$, SLPADR 
MOV #1$;SLPERR 
1S: MOV ERRVEC, -(SP) | ;SAVE_ CONTENTS OF LOC 4 
MOV 82S, ERRVEC :SET TIME-OUT TO ERROR REPORTER 
MOV ERRVEC+E -(SP) 
MOV #340, ERRVEC+2 
BIC #0, IKMADO ;CAUSE A DATA IN, DATA OUT 
CLR aKMADO ;CLEAR KMC 
CLR aKMAD2 
CLR aKMADY 
CLR aJKMADE 
BR 3$ 
; OPERATION. 
2$: ERROR 1 ; TIMEOUT TRAP TO LOC. 4 WHEN 
KM-11 WAS ADDRESSED. 
;BLEASE DO NOT USE LOOP ERROR OPTION 
BU OOP ON TEST” (SWRI4Y) IF YOU LOOP 
:ON THIS FAILURE. 
ADD #4, SP ;TAKE CARE OF TRAP SP. 
3$: MOV (SP)+,ERRVEC+2 ;RESTORE ERROR VECTOR. 
MOV (SP)+, ERRVEC 
H err alt he 
RTE #TESt KMC-11 FUNCTIONS 
3% 
!*#IN THIS TEST WE ATTEMPT TO RUN AN INSTRUCTION TESt ON THE KMC-11. 
:*YOU WILL NOT BE ABLE TO LOOP ON AN INDIVIDUAL SUBTEST, BUT MUST LOOP ON 
:*THIS WHOLE TEST SINCE ONCE THE MICRO-CODE IS STARTED, IT EXECUTES IN-LINE 
:%WITH NO-LOOP BACK CAPABILITI 
:xIF THIS TEST FAILS YOU ghoueB SUN THE REGULAR KMC-11 DIAGNOSTICS 


SEQ 0049 


LOY 


MAIN -l1- ORLPA- A MACY11 27(6S4 -DEC-77 :S8 PAGE 20 
ERE moet Khe Pt Pune tens - SEQ o0S0 
963 ; AVAILABLE _F R THE KM 
4 *#FOR EACH TE ial th ist THE MICRO CODE THAT THE KMC EXECUTES 
S - Saeko pegggentemennstaeh al CEGSESGTE Sietascaatonnon 
tis 
367 pp3eue g09997 oo000S0 001160 Mov #50, sT IMES nite SO. Q ITERATIONS 
363 003654 004537 037534 Re Bact tend KM oiac. MICRO-CODE 
971 ogsee? pogagg¢ * WORD ORLPXL 
372 90 00 O12777 040000 175576 hoy a8 T14,3KMADO ;INITAILIZE LPA 
974 oe 10S: N R :SHORT DELAY. 
975 oo3678 ? : 
tee Re Ms 
372 003676 112777 O00210 175564 MOVB #B1T7!BIT3, IKMADL ;SET RUN BIT ON KIC. 
879 SBTTL KMC-DIAG. SUB-TEST#1 CRAM WRITE ONES TEST 
384 ; sTEST #1 
982 : CRAM ONES WRITE TESt 
383 : ENTERED ON INIT 
8 TST1: MOV & 377,BREG ET aut ON Ss 
: BE ECU) EF RE BE ao cam 
988 MOVE BREG, OUT! <3> 
3 nove | BREE SU <3) 
991 MOV BREG;OUT1 <> 
a5 MOVE BREG,OUTI1 <7> 
994 Al: MOVE INP1 <0>,BREG ;WHEN POP-11 DONe VERIFICATION, 
335 BZ Al tIT WILL CLEAR CRAM ADDR#O 
997 % 
998 
1 naReate p03934 po4458 1124 ait $800Re GD XPECT 377_IN ADDR. #0 
1880 88354 1155 7 T3825 obi ise MOVB se RB boaT RE ApBR’ 0 
1002 7 023737 001124 O01126 CMP SBDDAT OOD READ? 
1903 003732 001401 BEQ  YES-NEXT SUB-TEST. 
1905 003734 104002 ERROR 2 ;CRAM WRITE ONES TEST 
19p7 736 018737 177777 001128 11S: Mov strobe, $8500" sEAPECT 377, 377,FROM ADDRS,2,3,4,5,6,AND 7 
10039 0037 023737 OO01126 001124 CMP $BDDAT, $ READ 0 
1910 0037 001401 BEG $88 PEO CHECK NEXT REG. 
101¢ 003762 104002 ERROR 2 ;CRAM WRITE ONES TEST, ADDR. 2 OR 3 
1014 3764 017737 175506 O01126 12%: MOV JKMADY,SBDDAT ;R ADDRS. 4 AND S. 
1015 OO3592 033535 001126 001124 a $BDDAT’ $GODAT READ ALL ONES? 
1016 oOO04000 001401 BEQ 13$ SYES-NEXT REGS. 
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1Bté oo4002e 104002 


& 


pb 
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1038 


10S1 


Sid das Aig asa al 


ee ee ee er ee 
ooo 

Soe 

ow 


ar 


oo040e4 


ob410 


004102 
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017737 
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001401 
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Gii2e 801189 


175436 


001124 
17S422 


177400 


175406 


175400 


001126 
001126 


001126 


001126 
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13$: 


14S: 


TSTe: 


Re: 


21S: 


22S: 


ERROR 
MO 
coe 
ERROR 
CLRB 


. SBTTL 
. REM 


O4 


12:58 PAGE 21 


2 ;CRAM WRITE ONES TEST, ADDR. 4 OR S 
ADE, ;REA R AND 7. 
RCCEOYEEBRAT (BEER BPE 
' 3 YES- 
2 ;CRAM WRITE ONES TEST ADDR 6 OR 7. 
@KMADO ;TELL_ THE MICRO-PROGRAM TO 
:D00 TEST #2. 


KMC-DIAG SUB-TEST #2 CRAM WRITE ZEROES TESt 


% 
;TEST #2 
CRAM ZEROES WRITE TEST 


ENTERED WHEN POP-11 ZEROES CRAM ADDR O 


, ee 
oOo 


BREG ;GET ZERO. 

#: Sart re ;PUT INTO ALL CRAM. 
‘ <2> 
,OUT1 <3> 
BREG,OUT1 <4> 
,QUT1 <S> 
,OQUT1 <&> 
,OUT1 <7> 


<O>,BREG ;GET Ze 
WHEN O92, PDP-11 READY FOR NEXT TESt. 


BaD 
We DOO 


Dre 
was 


SGDDAT ;EXPECT ZERO REGISTERS. 
@KMADO, SBDDAT sREAD ADR.O 


21 F ZERO, GOOD. 

#177400, SBDDAT 

2 ;CRAM WRITE ZERO TEST, ADDR.O 
JKMAD2, SBDDAT READ ADDRS. 2,3 

22 OD IF=0 

2 nee WRITE ZERO TEST, ADDR 2 OR 3 


SON, SEOOAT + B50D GQORS 4,5 


2 ;CRAM WRITE ZERO TEST, ADDR. 4 OR S 


SEQ 00S! 


S 
5 


S 


bb pe ee pe ee r 
Uv 


NNN D 


O0O00000000000 
DODOODS NSNNN S 


00000 


ee eh be be ee be be ee ee ee be ee he ee ee 
o00 


ee ee eh 


MPN Ne ee ee 





NOY 


Borour 


Bt 
fWhr--Ow0Oon 
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Pll KMC-DIAG SUB-TESt #2 CRAM WRITE ZEROES TEST SEQ cose 
1 

004104 017737 175372 001126 23%: MoV QKMAD6,SBDDAT  ;READ ADDRS. 6,7 
004112 001401 BEQ 24s :GOOD IF=0 
004114 104002 ERROR 2 ;CRAM WRITE ZERO TEST ADOR. 6,7. 
004116 112777 000377 175342 24%: MOvB #377, AJKMADO ;TELL MICRO-CODE WE'RE READY FOR NEXT TEST. 
3 - SBTTL KMC-DIAG SUB TEST #3 BRANCH TEST 
0 3 
2 :TEST #3 
3 : BRANCH TEST 
Ss : ENTERED WHEN PDP-11 RETURNS 377 TO ADOR.O 
: NOTE WE HAVE TO ASSUME BR AND BZ WORK 
: OR WE COULDN’T HAVE GOT THIS FAR. 
: UPON SUCCESSFULL COMPLETION OF THIS TEST WE 
: PUT CODE 377 INTO CRAM ADDR 2 
: AND 0 INTO CRAM ADDR.O. ON FAILURE 
: WE ONLY ZERO CRAM ADDR.O. 
34 TST3: MOVE i 376, BREG ;GET ZERO BITO 
5 MOVE # 375,BREG taTt Rep 
7 BB1 T ‘ERROR IF BR 
8 MOVE # 357, BREG :BIT 4=0 
3 BBY T3E ‘ERROR IF BR 
0 MOVE # 177,BREG ‘BIT 720 
i BB7 T3E :ERROR IF BR 
3 MOVE # 1,BREG ;POSITIVE BR TEST 
¢ geo Te 5 PE ONT, ERROR 
6 A3: MOVE 8,2, BREG ;BR OR b1T ag 
g BR T3E IF NOt BR ROR 
93 B3: MOVE # 20,BREG :BR ON BIT 4 
ef TEAR. Bio 
2 C3: MOVE # 200,BREG :BR OF BIT 7 
5 Ba” O3e SE ERROR 
° D3: MOVE #0, BREG TEST” 8z NEGATIVE 
7 MOVE # 377,BREG :POS BR F 
8 BZ E3 ?SHOULD BR. 
3 BR T3E ‘ERROR IF NOT. 
i E3: MOVE BREG,OUT1 <2>  ;PUT 377 IN OUTPUT REG #2 
2 BR F :IF BR INSTR FAILS TO WORK 
3 MOVE # O,BREG :THEN A ZERO GETS PUT IN #2 
4 MOVE BREG,OUT1 <2> A SIGN OF AN ERROR 


MAINDEC -11- DRLPA-A 
ORLPA.P11 


ee ae ee ee be ee ee ae ae be ne be be be be be be he ee ee ee ee be ae ae ee ee be be ps bo he be ee ee ee 
WHI VIA LATTLE ETO TSOANNNIE SE eee es COUUUEWUMuuruunTY 
BATU LONI ODO YOM LOO DONE OL OOO TR LOMO DORR Patitet itt petty 


oo 
00 
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he 
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Oe BE 6S WENDY 
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104003 
ooosso 


105777 
001002 


104003 
000543 


2777 
5000 
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KMC-DIAG SUB TEST #3 BRANCH TEST 


F3: 
T3E: Vv # 0,BREG ;SIGNAL PDP-11 THAT WE ARE 
m NOVE BREG,OUTL <O>  / THROUGH BR-TEST. 
% 
CLR RO ; TIME OUT COUNTER. 
175334 308: rstB akMADO sHEGRO, CODE DONE? 
N RO ‘NO-CHECK FOR TIME OUT. 
N 30S *NO-TIMEOUT, LOOP 
ERROR _ ;KMC-11 FAILED TO FINISH BRANCH TESt. 
i 
175322 31S: TSTB aknape ;DID ALL BRANCHES WORK?,CODE 377 IN ADDR 2 
ERROR 3 ;KMC-11 FAILED BRANCH TESt. 
BR TST3 33 
- SBITL kMC-DIAG SUB-TESt #4 ALU TEST 
:TEST #4 
ALU TEST 
; ENTERED WHEN PDP-11 PUTS A CODE 377 INTO 
: ADDR 2=0 IF BAD 
: <> G sGET CRAM ADDRO 
_ ee" A —— WHEN =377 DO TESt 
AY: MOV # 0, BREG ;GET=0 
MOV BREG, OUT <2> . 
Deen SPAD cay ox ;MAKE = 377 
Ey Bye !BR IF GOOD SEC. 
~ Eee yee 
z= ce !BR IF = 377 
4: MOV: # 377, BREG 
? MOVE BREG, OUT! <2>  ;RETURN GOOD CODE 
THE: MOVE # 0,.BREG ;RETURN CODE 0 
MOVE BREG,OUT1 <O> 
: 77, aKMA ;START TEST. 
ar a _ oR Ra angus ‘TIME OUT COUNTER 


SEQ 0053 


| 
| 





COS 
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DRLPA.P11 KMC-DIAG SUB-TEST #4 ALU TES SEQ o0s4 
1179 004166 105777 175274 41$: TSTBAKMADO ; DONE? 
1180 4172 0014 E des : YES-CHECK RESULTS 
118) 1¢8 00 Ni R ;NO-T OUT’ 
iss y OC 41$ ;NO-LOOP. 
1184 04200 104002 ERROR 3 ;KMC-11 FAILED TO FINISH ALU TEST. 
1185 004202 000530 BR TSTS +5 
1187 go4204 132777 000377 175260 42$: CMPB #377, AKMAD2 ;DID IT DO IT RIGHT? 
1188 4212 1401 BEQ 50s 
1130 004214 104003 ERROR 3 ;KMC-11 ALU TESt FRILED. 
119¢ .SBTTL KMC-DIAG SUB-TESt #S NPR TEST ZERO TRANSFER 
1194 REM % 
lige 
1138 :TEST 5 
1198 ; 
1198 : NPR TEST 
1368 : ENTE N_LINE WHEN PDP-11 PUTS CODE 377 INTO 
120 : DOES AN INPUT DATA XFERR FROM LOC 1124 
1204 : IN PDP-11 MEM TO LOC [126 
1205 : DOES NO DATA CHECKING RETURNS 
1509 ; CODE 0 TO CRAM ADDR.O WHEN DONe. 
1208 ‘ 
1209 TSTS: HOVE INP1 <0>,BREG ;WAIT FOR POP-11 
1210 AS 
teil BR TSTS 
HE 5: TOE BebuCEfy cs» SET ApReatR 
iste MOVE é S, G i aEt te ADDR OF ADDR. 1124 
1216 MOVE BREG,OUTO <4> SET LOW ADDR. 
ile hs A ee 
1e13 BS nov T’< iO, GREG GATT FOR NPR DONE. 
i551 . 
ies ROVE EAPO SOARES SETH OM TEP Béc 
1224 Mo PReo’ cL G GET HIGH E. . 
1225 MOV: G,0UTO <3>  ;SAVE FOR OUTPUT. 
1eeb MOV; i BREG :GET OUTPUT ADOR.=1126 
1 MOV BREG,OUTO <7> 
le MOVE # 126,BREG ;LOW PART. 
1550 MOVE BREG, OUTO ‘Bap <4> /-STN 
1s AND aed <4} eRe sab . 
123 MOVE # 0,BREG 


MAINDEC -11- DRLPA-A 
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Se, tase 


001124 
77777 
00377 


175222 


001124 


178858 


001126 
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cs; 


SOs: 


S1$: 


Ses: 


TST6: 


AB: 


OS 


i2:58 PAGE 25 


BREG,OUT1 <10> 
INP1 <10>,BREG 
cs 


# 0,BREG 
BREG,OUT1 <O> 


thy ERS 


aKMADO 
$ 


518 

3 
SGDDAT , SBDDAT 
60S 


2 


SEQ O0SS 


;SET NPR OUT. 


;WAIT TILL DONE 


; TELL POP-11 WE’RE DONe. 


;CLEAR SGDDAT (LOC 1124) 


i GEER MICRO-CODE TO GO! 
CLEAR TIME OUT COUNTER. 


ane-nECRECODE DONe? 
;NO-TIME OUT OCCUR? 


;KMC-11 FAILED TO FINISH NPR TEST. 


;NPR ALL_ZEROS CORRECTLY? 
;YES-NEXT TEST. 


;KMC-11 NPR TEST ZERO TRANSFER 


e-SINS SUB-TEST #6 NPR TEST ONES TRANSFER. 


NPR TESt 


a ey INLINE WHEN PDP-11 PUTS CODE 377 INTO 
T DATA XFERR FROM LOC 1124 


OES AN I 
Ree ho bata. cHECKENG® AFP urns 
CODE NTO CRAM ADDR-O WHEN DONe. 


INP <0> , BREG 

TSTb6 

# 2,BREG 

BREG,OUTO <5> 
# 124, BREG 

BREG, OUTO <4> 
1, BREG 


;WAIT FOR POP-11 


;SET TO DO NPR IN 


TH 
ig! Con H ADR OF ADDR. 1124 


;SET TO NPR IN 


| 
| 


eshte —— DRLPA-A 


DRLPA.P 


1287 
1288 
1289 


BNTN LOH 


Rees 


BIPALE 


ea a) 
WONCU SWe-OW 


NOU EU 


ee ee ee ee 
BION LOWS. 
N Wrue 


WWWWWWWWWWW 


£W 
Ow 
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004272 
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004322 
004324 
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004334 


004336 


005037 
012737 
112777 


023737 
001401 


104002 
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EOS 


KMC-DIAG SUB-TESt #6 NPR TEST ONES TRANSFER. 


001126 
177777 


000377 


001124 
175160 


1751Se 


001124 001126 


Bb: 


Cb: 


60S: 


61S: 


62S: 


ERROR 


; TEST #7 


BREG, OuTL «10> 
INPL’ <1 10>, BREG 


INP1 <10>,BREG 
Ce 

# 0, BREG 
BREG,OUT1 <O> 
SBDDAT 
#177777, SGDDAT 
#377, AKMADO 

RO 

3KMADO 

62S 

RO 

61S 


3 

TST3 
$SGDDAT , SBDDAT 
708 


2 


INTERRUPT TEST 


; CAUSE _NPR 


;WAIT FOR NPR DONE. 


;GET LOW BYTE DATA. 
sutrut NPR TE REG. 


;GET HIGH 
;SAVE FOR 


;GET OUTPUT ADDR: =1126 


;SET NPR 
;WAIT TIL 


; TELL POP-11 WE’RE DONe 


;NOW XFERR SGDDAT TO SB8DDAT 


;START NPR XFERR 
; TIME OUT COUNTER 
;DONE NPR’ 


IN 


BYT 
QUTPU 


OUT. 
L DONE 


° 


;NO-TIME OUT? 


;KMC-11 NPR TESt FAILED TO FINISH. 


;ONES XFERR OK? 


; YES-NEXT 


;KMC-11 NPR ONES XFERR FAILED. 
“parr KMC-DIAG SUB-TEST #7 INTERRRUPT TEST. 
-& % 


TEST. 


SEQ 00S6 


2S 
WWW D0 
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Sone 
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£ 
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asun NNOOO 
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o 
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Pll KMC-DIAG SUB-TEST #7 INTERRRUPT TEST. SEQ 00S7 


THIS TEST GENERATES TWO INTERRUPTS 


, 
: THE 1ST INTERRUPT TO VECTOR xxg WHEN 
: CRAM ADDR.O =377 BY PDP-11 CONTROL. 
: THE @ND INTERRUPT TO vECTOR XX4 WHEN 
: CRAM ADORO =377 (1ST MODE=0 AGAIN). 


TST?: MOVE he (0>,BREG ;WAIT TILL POP-11 READY! 


BZ 

BR TST? 
A7: MOVE INP1 <11>,SPAD <4> 

AND SPAD <4, BREG, SPAD 

MOVE # 200, BREG 

SPAD ‘4>, BREG, BREG 

MOVE BREG, OUT! <11$ ;SET_INTR TO ADDR. XxO 

B7: MOVE INP1’<11>,BREG WAIT TILL DONe 


# 0,BREG ;TELL POP-11 WE INTERRUPTED 
MOVE BREG,OUT1 <O>  ;IN CASE WE DIDN’T. 


C7: MOVE INP1 <0>,BREG ;NOW WAIT FOR_PDP-11 TO TELL 
BZ 07 !US TO INTR. TO VECTOR Xx4 
BR C7 

D7: MOVE INP1 <11>,SPAD <4» 
AND S <4> ,BREG, SPAD 


% 8 
0 SPAD ¢4>, BREG, BREG 
MOVE BREG,OUT! <11$ ;SET INTR TO ADDR. XX4 


E?7: MOVE gyi (11>,BREG ;WAIT TILL DONE. 


MOVE # O,BREG ; TELL POP-11 WE THOUGHT 

MOVE BREG,OUT1 <O> ;WE HAD INTERRUPTED! 

BR 

% 

340 012777 004372 175210 70$: MOV #72$,9VECT1 ;SET-UP FOR 1ST INTERRUPT. 

004346 OOs037 177776 CLR PS ;LOWER PROCESSOR STATUS. 
wakes dE 505 000377 175106 ite ay 7 eee ; TELL MICRO-CODE WE’RE READY! 
00436e 105200 71S: INCB RO ; TIME-OUT COUNT IN CASE OF NO INTERRUPT. 
004364 100376 BPL 71$ 
004366 104003 ERROR 3 ;KMC-FAILED TO iNTERRRUPT AT Xx0 
004370 000435 BR TST3 33 


004372 062706 vud0004 72$: ADD #4, SP ;RESTORE STACK. 


1395 
1396 


Ni 


ee ee eh ee 
SSE ESE GGY 
DO VEN LOU-ODD 


904440 
oo444e 


oo4444 
004450 
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OO4444 175154 

O001SS&6 175144 

O000Ge 175136 
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001560 175102 
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7338: 


74S: 


GOS 
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#74, JVECT2 
VECTL, aVECTI 
#2, QVECTI 
#377, JIKMADO 
RO 

RO 

73% 

3 

TST3 


#4, SP 
vetT2, IVECT2 


SEQ 00S8 


;SET_NEW INTERRUPT VECTOR 
;RESTORE OLD VECTOR. 


;ALLOW INTERRUPTS 
; TELL MICRO CODE WE’RE READY AGAIN. 
; TIME OUT COUNTER IN CASE OF NO INTR 


;KMC-FAILED TO INTERRUPT AT O04 
i 


;RESTORE STACK 
;RESTORE VECTOR. 
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DRLPA.P11 KMC-DIAG SUB-TEST #7 INTERRRUPT TEST. 
ADD #2,aVECTe 


mit OO44S6 062777 OO000e2 175074 


HOS 


SEQ 00S9 


IOS 
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DRLPA.P KMC-DIAG SUB-TEST #7 INTERRRUPT TESt. SEQ 0060 
1412 
1413 s: REKKKAKEKAAKAARRRAAL AERA RARAARARARAE SAKA AAKAAAAAARAAAAAAAARAAAKRAE 
1413 :&TEST 3 *%TEST SLAVE MICRO PROCESSOR START 
1416 5% 
1417 :*#IN THIS TEST WE’LL LOAD IN MICROCODE INTO THE KMC-11 
1418 !*THAT WILL ALLOW US TO tALK TO THE SLAVE MICRO-PROCESSOR. 
ie? " 
1422 ;*WHEN THE SLAVE MICRO-PROCESSOR IS INTITIALIZED (IT GETS INITED 
1423 :4WHEN BIT 14 THE KMC’S CSR GET SET) IT SENDS US A VERSION 
1424 !#NUMBER THROUGH THE IPBM’S FAST PATH REGISTER IF THE 
1425 :#INITIAL CSR OF IPBM (AS SEEN BY THE SLAVE) IS CORRECT. 
1426 ?*#IF BAD, IT CODE 377 THROUGH BOTH FAST PATH AND 
1487 :#SILO TO INDICATE AN ERROR. 
1429 = REGGE EERE ARERR RR RRR RRR RRA LE RRR ARLRERAAE RRA RAARERRAAAREE 
1430 po4Hes o00004 +t$T3: SCOPE 
1431 OO4466 012737 OO00010 o01160 MOV #10, STIMES ;;D0 10 ITERATIONS 
14 004474 004537 037534 ISR RS, S$LOAD ;LOAD MICRO CODE INTO KMC-11 
14 .GLOBL DRLPXO 
iM 004500 oo0000G "WORD ORLPXO ;FILE “DRLPXO” 
14 


WWWWW 
NOUIL WW 


004S0e O0Se777 oO8#0000 174756 BIS #BIT14,dKMADO ;SET INIT BIT, WHEN THIS BIT 


MAINDEC -1li- ORLPA-A 
ORLPA.P11 13 


1438 
1439 004510 005000 


7(6S4) 


13-DEC-77 


12:58 PAGE 31 


AVE MICRO PROCESSOR START 


CLR 


RO 


JOS 


;CLEARS IN SLAVE, RUN STARTS. 


SEQ 0061 


KOS 


eS we Fe an. fe MACY11 27(654) 13-DEC-77 12:58 PAGE 32 


DRLPA.P *#TEST SLAVE MICRO PROCESSOR START 
1440 ports o0S2e00 1$: INC RO ;LITTLE DELAY LOOP. 
iead S14 001376 BNE 1$ 
1443 004516 012777 104000 174742 MOV #BIT1S!BIT11,aKMADO ;CLEAR INTIT, SET RUN 
1444 G94Se4 005000 CLR RO 


SEQ 006e 


MAINDEC -11- ORLPA-A 
DRLPA.P11 T3 


144S O004S26 005200 


MACY11 27(654) 13-DEC-77 12:58 PAGE 33 
*TESt SLAVE MICRO PROCESSOR START 


es: INC RO 


;LITTLE DELAY. 





SEQ 0063 





MAINDEC -11- DRLPA-A 
DRLPA.P11 T3 


004S30 
Bb4836 


oo4s4e 
004SS0 


oo4sSe2 
oo4SS4 


O0O4SS6 


004560 
004S62 


004570 
004S76 


001376 
881410 


032777 
001002 


104004 
000427 


104004 


o004eS 
112777 


122777 
001374 


MACY11 27(654) 13-DEC-77 12:58 PAGE 34 
#TEST SLAVE MICRO PROCESSOR START 


BNE es 

000040 174726 BIT #BITS,a¥MADO 
BE@ 4$ 

oooode 174716 BIT #BI7T1,aKMADO 
BNE 3$ 
ERROR 4 
BR TSTY 


3$: ERROR 4 


BR TST4 
ooooo4 174702 4$: MOVB #4, JIKMAD2 


000377 174674 S$: CMPB #377, AKMADe 
BNE S$ 


;D1D SLAVE SEND DATA THROUGH F 
;BR IF YES (LOOKING AT IPBM csr "git S) 
;SENDS EITHER VERSION OR CODE 3 


A RE BEES™ kell Eo 


CSR BIT 1 
IPBM_ INIT ERROR 


am Tal }eB PROPERLY. AS SEEN FROM 


;ERROR IPBM OR (MOST LIKE 
;SLAVE MICRO PROCESSOR FA 
;T0 START PROPERLY. 


; ISSUE CMMD TO READ FAST PATH 
;WAIT FOR READ. 


LY) 
ILED 


SE@ 0064 


MAINDEC -11- DRL 


DRLPA.P11 
1472 004600 
1473 004606 
1474 004614 
1475 
1476 OO04616 
1477 


PA-A 
T3 
013737 
117737 
100002 


104005 





NOS 


MACY11 27(654) 13-DEC-77 12:58 PAGE 35 
#TEST SLAVE MICRO PROCESSOR START 


001S1ie 001124 MOV VERSN, SGDDAT ;GET MICRO-CODE VERSION NUMBER. 
174664 001126 MOVB QKMAD4,SBDDAT ;IF=MINUS, ERROR CODE RETURNED, 
BPL 6$ ;IF PLUS, NEXT TEST 
ERROR 5S ;ERROR-SLAVE MICRO PROCESSOR 
; INDICATED M82S4 FAILED TO 
; INITIALIZE PROPERLY. 


SEQ 0065S 


per 


MAINDEC -1i- DRLPA-A MACY11 27(654) 
DRLPA.P11 T3 


1479 004620 O0040S 


13-DEC-77 


BR 


12:58 PAGE 36 


*TEST SLAVE MICRO PROCESSOR START 


TST4 


BO6 


Fe ee ol 


SEQ 0066 


——— 





CO6 
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DORLPA.P11 T3 *TEST SLAVE MICRO PROCESSOR START SEQ 0067 
1NeL 004622 123737 001124 001126 6S: CMPB $SGDDAT , SBDDAT i NUMBER THE MICRO-CODE ——— 
Re WARTS OEE SEU, 
eH 004%630 001401 BEQ TST4 
fig coveae s0v00s cmon AEPUACB°BP EPR "EEA ohocesson 
1488 ;NOTE: (1) Mi “OF , HE RUNNING THE 
1489 j WRONG VERSION H ojocs te 
1490 ;(2) § LAVE MICR HAD 
1491 ;OR (3) _ M8254 ATGH t VBE BAD 


Se : (FAST PATH) 
-SBTTL **PHASE 2 IPBM/DMC TEStING. 


MAINDEC -1li- DRLPA-A 
DRLPA.P11 


UOWNLOM-ODOIERE 


— 
WUT UW Cun 1 UT Ut 


furofure— 
W-OWONCUILW 


SBOVERLOV-ODSONOUE 


WU UU UU UU UU UU 


ee ee ee eh he 
Pe oe 
wre 


~ 
uw 
ain 


004634 
004636 


do4esd 
Bosees 
BBse5E 


T 


oO0o004 
012737 


b12737 
618737 
BBT606 


MACY11 27(654) 


*TEST DATA LOOP BACK THROUGH IPBM,MB2S4 MODULE SEQ 0068 
| ee Ee enCK THROUGH IPBM Maced MODULE 
jATESt %TEST DATA LOOP BACK THROUGH IPBM,M82S4 MODULE 
iN, "AS BRT TO bROERS ARB How E'AE ABLETO DO THIS 
; #YOU MUST FIRST UNDERSTAND WHAT THE SLAVE MICRO-PROCESSOR 
i a WE SLAVE RECS RECEIVES. cong 200 IN ITs a4 ty ngcrsTEn 
fi FS dat 1 "RIS Hee RBEETIA eed he atl 
PRETO TSSSTRe FRRTEORS DMDOR BF rate? PPB Os ro 
;% ; : 
HTTAHS TRE ABER "OTH "BREOiSORETEBNE “ORLPHO™ PRE LonDeD 
RUE RUC GRe cu eee ro 8 
j PUT + tN 0 KMow 1) BOR. 2. Pr Oke 
54" 377" Mo .2 WHEN N FINISHED COMMAND. DATA IS XFERRED 
Resor tat te Pa PY Bole 
THIS MICRO-CODE ME aUTTON: BI MC=11, ADDR MUST REMAIN 
:%SET WHEN A COMMAND IS GIVEN ( tare i THE “RUN” BIT) (INITIALIZE 
Edo CLEARS BIT). I USE BYTE ADDRESSING TO AVOID CLEARING IT. 
is ~DRLPXO™ COMMAND FUNCTION 
;# 1 
if 5 Bite SUteo 5 BATALIN' Coll BPTE "Ge “Rc “Ap 
te 4 PUT IN LOW BYTE Aor Rnc ADDR 
if 5 WAL E FPAST Pamy R Rec’, DATA IN-LOM BYTE OF KMC AD 


000010 001160 


B08001 001106 
Go0e08 808278 
00S266 


DO6 


13-DEC-77 12:58 PAGE 38 


*#COMMAND "200" SENT TO THE SLAVE THROUGH THE FAST PATH 
tee TO PUT IT INTO LOOP BACK MODE. 


*YOU MAY NOT LOOP ON A SPECIFIC DATA rar FAILURE 
*YOU_MAY USE LOOP ON TEST CAE Se (SWR_BIT14 
s8Y0 THIS TESt FAILS YOU SHOULD RUN THE mee { IPBM) DIAGNOSTIC. 


"ge °°" cn iio anaemia renege aru cnmeabil iinet a en ces ma 2 


+éT4 


#10,STIMES _ 10 ITERATIONS 
CLR 20$ ATA cbQoP 60 COUNTER 
MOV #1, $LPADR DOR. 
MOV #1$. $LPADR N CASE RROR Bae SED. 
MOV a, is ET IN “i 9oP DATA P ERN. 
ome BRE sg iBige ENTRY, LEGA bare. YF at “COOP ON ERROR” 


3 


UMIUIUIUIUIUIUTIUIUIUT «—“O 


: 


9 
D 


OMeon > 


alta! 
ae 4 


uw 
0 


A i 


mui 
co 
LU 


oEee 


i 


UIUIUIUTUUTUI 


SINN N 
FuILON— oO 


E06 


Due 


C -11- DRLPA-A MACY11 27(654) 13-DEC-77 12:58 PAGE 39 
Pll TY *TEST DATA LOOP BACK THROUGH IPBM,M82S4 MODULE SEQ 0069 

;WE’LL TRY TO rECOVER 

004700 112777 oO00200 174570 MOVB #209 aKMADY ;PUT “LOOP BACK” CMMD INTO XFERR REG. 

004706 112777 OO000S 174556 MOVB akmabde SBE “ORLPXG" GIVE FAST PATH CMMD TO 
?AT THIS POINT, SLAVE WILL 
$L00F 256 (DECIMAL) BIECES OF DATA 

THROUGH THE FAST PATH REG. 

004714 105737 005267 2$:  TSTB 20$+1 — IN SILO SECTION, EXIT F.P. SECTION. 

004720 001064 BNE 10$ 

004722 004737 034062 ISR PC, WIR ;WAIT FOR PROGRAM “DRLPXO” TO BECOME 
!READY FOR ANOTHER COMMAND. 

726 012737 oo00S2 001124 MOV #S2, SGDDAT ;AT THIS POINT, EXPECT IPBM (MASTER 
4734 005037 001126 CLR S$BDDAT :SIDE) CSR=S2 

004740 117737 174522 001126 MOVB § @KMADO, SBDDAT HER = RoR (*DRLPXO™ REFLECTS CSR IN 

004746 123737 001124 9001126 CMPB $GDDAT , SBDDAT -RIGHT CODE? 

004754 001401 BEQ 3S ?YES-SKIP ERROR. 

004756 104005 ERROR 5 ;CSR BAD. IPBM MASTER CSR S/B Se. 

004760 113777 005270 174510 3$: MOVB  21$,aKMADY ;PUT DATA PATTERN IN PRG. “DRLPXO™ 

004766 005237 005266 INC RR 

004772 112777 OO000S 174472 MOVB #5, JKMAD2 i ISSUE WRITE F.P. CMMD. 

005000 004737 O34062 ISR PC’ WIR WAITE FOR “DRLPXO” TO BECOME READY AGAIN. 
'AT THIS POINT IN TIMES THE 


a 


MAINDEC -li- en ~ tes MACY11 27(654) 13-DEC-77 12:58 PAGE 4 
ORLPA.P11 *TEST DATA LOOP BACK THROUGH IPBM,MB254 MODULE SEQ 0070 


1254 i BLBVE RD LOOP TT BACK TOUS. 

1578 oos004 905000 CLR RO . 

1580 905008 032772 000040 174452 4$: BIT #81TS, aKMADO MALT TILL F.B. HAS DATA TO BE READ. 
1283 005016 105200 INCB RO ‘DON’T WAIT’ T UL CONG! 

1583 o005020 100372 BPL 4g :IF INC RO OVERFLOW, THE SLAVE 

1584 ‘NEVER WILL RETURN DATA. 

1586 ooSo22 104004 ERROR 4 » SLAVE _MICRO-PROCESSOR FAILED TO 
1587 ‘LOOP BACK DATA THROUGH FAST PATH REG. 
1589 

1590 o0so024 112777 op0004 174440 S$: MOVB #4, IKMAD2 ;DATA IN, FP awREADY, TO BE READ, BETS 
153¢ 005032 004737 034062 ISR PC,WIR :WAITE FOR DRLPXO. er: 
1594 005036 117737 174434 001126 MOVB aKMADY $BODAT  ;READ DATA 

1595 005044 113737 O0S5270 001124 MOVB $, SGODAT :21$ CONTAINED DATA SENT 


G06 


MAINDEC pu DRLPA-A $ MACYLI 27(654) 13-DEC-77 12:58 PAGE 4 
DRLPA.P TY *TEST DATA LOOP BACK THROUGH IPBM,M82S4 MODULE SEQ 0071 

1596 

1336 gos0se 123737 001124 001126 cNPB SGODAT, SBDDAT ;DID DATA LOOP BACK OK? 

15 

1600 oosob2 104007 ERROR 7 ;FAST PATH DATA ERROR 

1602 o0S064 105237 005270 6$: INCB 21S UPDATE O08 BACK PATTERN. | 

CON IFY OOH Ss 

188s c ee ESSEC or TESt 

1607 THE INST Hy #0 21s To 

1603 HO DIET RING, NOP NOP 7 Y Turse 

1610 ‘Sout THe SARE’ P DoF Te AN oR 

1611 ;TO ANY OTHER INSTRUCT ION THAT 

1612 :WOULD MODIFY He P PATTERN 

1614 005070 000711 BR 2s jf ON NOT Noe tic PRog T MES . LOOP 

161 E ac 

iei8 eat BATH Reo. ae Rove MUST 

1618 256 DATA BYTES THROUGH 

1618 eer sito 

1e59 005072 10S: HERE 9 ONLY 8 AFTER 

1622 A BYTES HAVE BEEN 

16e3 D THROUGH uo ofrst PATH 

1be8 NOW WELL Tie i ATA 

1 005072 012737 oD00000 005270 MOV #0,21$ ip ti ONeW RN IN PATTERN 

1B55 ie ma Re ae a ARTING 

1628 + PATTERN. 

1628 ‘WITH IT’ (REMEMBER REMY. 5 BITS Oona). 

1e32 1 32737 001000 o0S266 118: BIT #B1T9, 20S ; DONE? 

16 este Ba70e4 BNE 18$ : YES-EXIT 

1633 005110 004737 o34062 ISR PC,WIR :MAKE SURE “DRLPXO” IS READY. 

HES SBSIAY BAEZ pppose oe = yaaa goer. sat ITE Foy. EXPECT Tram se 

1637 O0S126 117737 174334 001126 MOVB § @KMADO,SBODAT READ CSR (“DORLPXO” REFLECTS CSR IN 

1638 :KMC’S ADDR. O) 

1640 005134 123737 001124 001126 CMPB  $GDDAT, SBDDAT ’ 

164 005142 001401 BEQ 128 eee FP ERROR. 

1643 005144 104005 ERROR 5 scan BAD, IPBM MASTER SIDE, S/B Se 

1644 ILE WORKIN 

1645 iW WITH Fa T PATH, CSR WENT BAD DURING 

1647 905146 113777 905270 174322 ~=s:12S: Move 21S, JKMADY sPUT DATA PATTERN IN PROG “DRLPXO” 

1648 0051 112777 900003 174304 MOVB #3, JKMAD2 + NAKE ER..BRePxo" WRITE SILO. 


HOG 


MAINDEC -11- DRLPA-A MACY11 27(654) 13-DEC-77 12:58 PAGE 4e 


DRLPA.P11 TY *#TEST DATA LOOP BACK THROUGH IPBM,M82S4 MODULE SEQ 0072 
1650° 005166 004737 034062 ISR PC,WIR sMATT TILL “DRLPXO” READY. 
1651 NOW-WE PUT DATA IN SILO. 
ies por agiie 
1683 oar HATS WE PICK IT uP. 
ipes poet sg «Bye 008 oo0002e 174264 13%: che aa TL, 3KMADO ;WAIT T SILO HAS DATA TO BE READ 
1688 bossde ¢ 031403 : Beo iis ‘ seg PEBbY, Bx COOP. 
1660 Boesoe I te $98 BPL Ts :DON’ nc“RO ov VERT OW: THE SLAVE 
1661 t NEVER” WILL ORE TURN bata 
1 o0s2 4 RROR 4 ; SLAVE FAILED TO LOOP BACK 
1ges . . Barn THASUGH eft a. 
1666 oo0S212 112777 oo0002 174252 14S: MOVB #2, IKMAD2 pate 7 SILO READY TO BE READ, TELL 
ig 005220 004737 034062 JSR PC,WIR PBbS Pok oBEBRo? hEapy 
1670 OOS224 117737 174246 001126 MOVB QKMAD4Y,SBDDAT  ;GET DATA. 
1671 AnS2e32 113737 OOS270 001124 MOVB 21%, SGODAT :GET S/B 
1838 005240 123737 001124 001126 ’ CMPB $GDDAT,SBDDAT ;DID DATA LOOP BACK OK? 
1678 o00S246 001401 BEQ 15$ 
1676 o00S2s0 104006 : ERROR 6 ;SILO DATA ERROR. 


I06 


MAINDEC -11- DRLPA-A MACY LI 27(654) 13-DEC-77 12:58 PAGE 43 
ORLPA.P11 TY *TEST DATA LOOP BACK THROUGH IPBM,M82S4 MODULE SEQ 0073 
1678 
1679 oO0S2S2 105237 005270 15$: INCB 21S ;UPDATE_ LOOP BACK PATTERN 
1680 :NOTE: IF YOU REALLY WANT TO, 
1681 > YOU_CAN MODIE Y THI 
1682 :SECTION OF TEST TO SEND ONLY A 
1683 ; SPECIFIC PATTERN. 
1684 :TO DO THIS, CHANGE THE 
1685 : INSTRUCTION “INCB 21$” (2 WORDS) 
1686 ‘ALONG WITH THE “MOV#O,21S” 
1688 O0S2S56 000710 BR 11$ ;IF NOT DONE 256 TIMES, LOOP. 
1689 ‘WARNING: THIS MUST 
1690 ‘SEND 256 DATA LOOP BACK PATTERNS 
1691 ‘ THROUGH THE SILO REG SO 
1692 ! THAT THE SLAVE MICRO CODE 
1693 tWILL EXIT FROM LOOP BACK 
1634 :MODE TO COMMAND MODE. 
ie9e 
1697 005260 005037 o0S266 18$: CLR 20% ;EXIT, ALL DONe! 
1698 005264 oo0402 BR TSTS ts 


-11- DRLPA-A 
1 TY 


“ 
06 OOSe66 000000 
01 O00Se70 9000000 


MACY11_ 27(654) 


20$: 
els: 


13-DEC-77 12:58 
*TEST DATA LOOP BACK THROUGH IPBM,M82S4 MODULE 


. WORD 
. WORD 


0 
0 


PAGE 4 


706 


;CONTAINS CURRENT LOOP COUNT. 
:CONTAINS CURRENT LOOP BACK PATTERN. 








1l- ORLPA-A 
Tm 


KO6 


MACY11 27(654) 13-DEC-77 12:58 PAGE 4S 
*TESt DATA LOOP BACK THROUGH IPBM,M82S4 MODULE 


.SBTTL PHASE 3 I1/B BUS TESTING. 


SEQ 0075S 





MAINDE 
DRLPA. 


1704 


Cc 
Pl 


-11- ORLPA-A 


1 


MACY11 27(654) 
PHASE 3 I1/B BUS TESTING. 


13-DEC-77 


12:58 PAGE 46 


06 


SEQ 0076 


QP 
cH 


NNNNNNNNN NNN NANNY 


WONITU £LWM-ODONOU CWO 


NSNSNINNANNNNNNNNNANNNNN 


o00S2e72 
005274 
005302 
005304 
005310 
005310 


ee ee ee ee ee ee ee eb ee ee 


NSNNASNNANNNNNY > PAPA 
ONOU LW OWON RLWM-GOOVO LOO oud 


Oo 655 5k E56253 


SSS SSS SSS SS SS 


eee itt ORLPA-A 


PHASE 3 I/ 


000004 
032737 


00190 
00013 


005037 


000001 


005750 
001126 


OP Us 


eTERF inc 


001562 


MO6 


ieee 12:58 PAGE 47 


SEQ 0077 


; jpeggeganensenngeqnoscere ets aia eee 
: ATE 170 DEVICE TEST-AD11-K OPTION 


SEIN THIS TESt WE ARE CHECKING OUT AN I/0 DEVICE ON Mu... te 3, 170 BUS. 
;*#WE HAVE A CERTAIN AMOUNT OF CONFIDENCE THAT T (IPBM) 


HE 
;*KMC-11 AND THE DMC-11 WORK. IN THIS TEST, THE AR TTRATION CIACUTTRY IS 
i Sati TE An ot AR Sa Ts oy oT 
;*IT FROM “SRI” (NOTE: AT THAT LOCATION IST XPLAIN 
Soy Paebe at elie eevee Lae oe 


*IF A FAILURE OCCURS IN THIS TEST, Y 
NDI IAGNOSTIC THAT os Thee OPTION.» 


VIDUAL D 
IN THIS TESt, WE WIL RCISE THE 
AS sd rin*s UNALTERED, eine DO tHTS TE TEST SENCE THE 


1 DEFAULT 170 DEVICE. IF _AN ADL1-K IS NOT ON THE 
170 BUS, YOU MUST DELETE IT FROM SR. 
TESTS: 1. MAKE SURE AD11-K RESPONDS TO ADDRESS. 
(NOTE IF THE AD11-K ON YOU _I70 BUS HAS NON-STANDARD 
ADDRESS, PLEASE REFLECT THE NEW ADDRESS IN ADDRESS “STREG” 


2. MAKE SURE WE CAN WRITE A ZERO INTO CSR (EXCEPT BIT 7:15). 


3. WRITE BITS 13,11,9,6 MAKE SURE THEY WRITE. 
4. WRITE BITS 12,10,8,4 MAKE SURE THEY WRITE. 
S. SET A/D START, MAKE SURE IT CLEARS, DONE FLAG SETS. 


Pe ee ee re Td 


6. SET A/D START AGAIN, MAKE SURE ERROR FLAG SETS, 
7. MAKE SURE ERROR FLAG CAN BE CLEARED. 
= 3 2 Ae SE SE SE SE HH J AE SE SE A A A A EH A SE ES EE a HE 


+415: SCOPE 


BIT #BITO,SR1 iN THIS DEVICE SELECTED FOR TEST? 
NOTE: DEFAULT=YES. 


TORI CRC RRC ICR ICRC RC RC RC RC RC RCC RC ORC ie 
~~ 


BNE $ 
OS 
10S: 
CLR SBDDAT 
;* MOV $BDDAT, JISTREGL 6 Ba D TA FROM SBDDAT TO DEVICE REG STREG1 
K-WHAT ° JUST DID IS 


ASK 
: OKGVE MIC@O-CODE TO WRITE THE CONTENTS 


NO6 


MAINDEC -11- DRLPA-A MACY11 27(654) 13-DEC-77 12:58 PAGE 48 
DRLPA.P1il TS 1/0 DEVICE TEST-ADL1-K OPTION SEQ 0078 
1759 ;OF THE AD11K’S CSR TO ZEROES. 
1760 :IF THE ADLIK FAILS TO rESPOND TO ITS 
176 i ADORESS- THE SLAVE WILL ND US AN 
17 ‘ER ODE THAT CAUSES US TO SET SAERR=1 
1763 :IN THE SUPPORT ROUTINES. 
1765 324 737 037532 TST SAERR ;DEVICE PRESENT? 
1768 005330 001403 BEG 11$ : YES-CONT INUE 
1767 005332 104010 ERROR 10 :A7D #1 FAILED TO RESPOND 
1768 005334 000137 005750 IMP 7§ :TO ADDR. 
1238 0 11S: 
1771 ;% MOV QSTREG1,SBDDAT ;/READ DEVICE REG STREG1,PUT DATA IN SBDDAT. 
1778 005350 2737 100200 001126 BIC #BITIS'BIT7,$BDDAT ;CLEAR OUT FLAGS 
1773 005356 S037 001124 CLR $GODAT 
1774 005362 005737 001126 TST $BD0A7 ;I1S CSR ZERO? 
1775 4 BEQ 1$ 
1538 005370 104010 ERROR 10 ;FAILED TO ZERO ADIIK CSR #1 
1778 005372 000572 BR TST6 HF 
1773 005374 012737 O25100 001124 1$: MOV #BIT13!BIT11!81T9!B1T6,SGDDAT ;NOW TRY A NEW BIT PATTERN 
1781 
1788 5% MOV SGDDAT,ISTREG1 ;/ PUT DATA FROM SGDDAT TO DEVICE REG STREGI 
1784 5% MOV QSTREG1,SBDDAT </READ DEVICE REG STREG1,PUT DATA IN SBODAT. 
1785 oOS422 042737 100200 001126 BIC #BIT1S'BIT7, $BDDAT ; IGNORE FLAGS 
1786 005430 023737 001124 OOlle6 CMP $GODAT,$BDDAT  ;B81T SET OK? 
1787 005436 001402 BEQ 2s 
1789 OOS4H4O 104010 ERROR 10 ;FAILED TO WRITE #1 AD11K CSR CORRECTLY 
1730 oos442e 000546 BR TST6 ts 
1798 O0OS444 012737 O12420 001124 2$: MOV #BIT12!BIT10!BITS!B1T4,SGDDAT ;NOW TRY A NEW BIT PATTERN. 
1794 
1795 5% MOV SGDDAT,ISTREG1 ;/ PUT DATA FROM SGDDAT TO DEVICE REG STREG1 
1797 5% MOV QSTREG1,SBDDAT ;/READ DEVICE REG STREG1,PUT DATA IN SBDDAT. 
1798 005472 042737 100200 001126 BIC #BITIS!BIT?, $BDDAT ; IGNORE FLAGS 
1799 005500 023737 001124 001126 CMP $GDDAT,SBDDAT  ;BITS SET OK? 
1g00 005506 001402 BEQ 3s 
1802 005510 104010 ERROR 10 ;FAILED TO wRITE #1 ADI1K CSR CORRECTLY. 
1803 005512 oo0S22 BR TST6 He 
1805 005514 005037 001124 3%: CLR $GDDAT ;NOW CLEAR ALL BITS SET 
1807 5% MOV SGDDAT,@ISTREGL ;/ PUT DATA FROM SGDDAT TO DEVICE REG STREGI 
1809 5% MOV QSTREG1,SBDDAT ;/READ DEVICE REG STREG1,PUT DATA IN SBDDAT. 
1810 OOSSYO 042737 oO00200 001126 BIC #B1T7. SBDDAT : IGNORE DONE FLAG. 
1811 605546 005737 OOlle6 TST $Bopat :CSR CLEAR? 
1812 oO0SSSe 001402 BEQ 


SSS sess 


=) 


3 

~~ 
3g 
VO 
~ 


oosss4 
ooSss6& 


o0oss6é0 


DBODODOwOoOnw VU 
oe pe 


&0SS70 


ee FJ 
fore 
WM -OWONOULCW 


rr 


005606 


SReReoS 


o0S624 
00S632 


005634 
005636 
00S640 


5 


bint RS nt at nt mt at wt at 
BONeM LOWES 


y= 


re 


ONOUSWwr-O 


OO0S666 
005674 
005702 
005704 


DODDOMDMOM 
vs) 


Ose saRES 


3 
2 005706 


spggane 


uw 
wo 
NX 


RRP RRRRRRRRRRARReSSTE TD po TH ORIN OHO ROR aREE 
[=] 
io 
q 
oO 


~l1- DRLPA-A 
1 TS 


104010 
oo0s00 


012737 


012737 


023737 
001402 


104010 
000450 
012737 


012737 
023737 
001401 
104010 


005037 


042737 


104010 


000001 


000200 


001124 


oocoo1 


100200 
001124 


001124 


000200 
001126 


) 


001124 


001124 


001126 


001124 


001124 
001126 


001126 


4) 13-DEC-77 
ESt-AD11-K OPTION 


S$: 


6$: 


ERROR 
BR 


MOV 
MOV 


MOV 
MOV 
MOV 


CMP 
BEQ 


ERROR 
BR 
MOV 


BO? 


12:58 PAGE 49 


10 ;#1 ADLIK CSR FAILED TO CLEAR. 
TST6 35 


DADBUF 1, MYTEMP ;/READ DEVICE REG ADBUF1,PUT DATA IN MYTEMP. 
#B1TO, SGDDAT :NOW WE'LL SET THE A/D START BIT. 


SGDDAT,@STREG1 ;/ PUT DATA FROM SGDDAT TO DEVICE REG STREG1 
#B1T7, $GDDAT *WHEN WE READ CSR BACK EXPECT 
:START BIT TO CLEAR, DONE TO SET. 


@JSTREG1,SBDDAT ;/READ DEVICE REG STREG1,PUT DATA IN SBDDAT. 
er ;START OK? 


10 ;CSR BAD AFTER #1 A/D START 
TSTb ;BIT O SHOULD CLEAR ONLY A/D DONe SET. 
s3 


#BITO, SGDDAT s OK NOH WE’RE GONNA START ANOTHER 
;A/D CONVERSION WITHOUT READING 
; THE R Su ta OF T Laat ONE. THIS 
;SHOULD CAUSE THE ERROR FLAG 

;AS WELL AS THE DONe FLAG TO sET. 


SGDDAT,ISTREG1 ;/ PUT DATA FROM SGDDAT TO DEVICE REG STREG1 
JSTREG1,$BDDAT ;/READ DEVICE REG STREG1,PUT DATA IN SBDDAT. 
#BIT1S!BIT7,$GDDAT ;S/B 

$GDDAT,SBDDAT  ;IS 15 AND 7 SET? 


6$ 
10 ;ERROR #1 ADL1K BIT 15 AND 7 SHOULD BE SET. 
SGDDAT ;MAKE SURE ERROR FLAG CLEARS 


SGDDAT,@STREG! ;/7 PUT DATA FROM SGDDAT TO DEVICE REG STREG1 
@STREG1,SBDDAT ;/READ DEVICE REG STREG1,PUT DATA IN SBDDAT. 


#8177, SBDDAT ? IGNORE DONE FLAG. 
seoort :IS CSR CLEAR? 
10 ;AD11K CSR FAILED TO CLEAR. 


@ADBUF1,MYTEMP ;/READ DEVICE REG ADBUF1,PUT DATA IN MYTEMP. 


07 
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DRLPA.P11 TS 1/0 DEVICE TEST-AD11-K OPTION SEQ o08s0 
867 
iBee 3 i.” S "Lhe a oe.CSCSSS 
1 20 i ATE 1/0 DEVICE TEST-AD11-K OPTION 
tr Ls (M8 DRAM SEP" OE A Cian} S1ig° 
1852 Eo Be Oe NOR Pe bavigets ERreRARuP LaeABT ut, Sqpingadinganscimastton 
igs AGNdsTIC IS SE iat DEVICES ON THE 
1878 i115, “wOhy ter ad a oG&r fe WE ce i Sobes BAD EXPLAIN 
18e¢ Eve CoS POR ORLETE SETAGOD) acl <gUURPYs fELAEE OM TM 
188i ? F A FAILURE “no! "S DERAIT, O6Vic SpouLD” THE 
1882 ;#INDIVIDUAL DIAGNOSTIC THAT Pexerctses THIS OPTION. 


~ 
co 
co 
W 


2. MAKE SURE WE CAN WRITE A ZERO INTO CSR (EXCEPT BIT 7:15). 


1884 : IN THIS TEST, WE WILL EXERCISE THE ADLI-K 
85 : IF DVIDI IS UNALTERE THIS TEST SENCE THE 
86 ; AD11-K IS A DEFAULT 170 EAN ADLI-K IS NOT ON THE 
87 ; 170 BUS, YOU MUST DELETE YRC 
83 ; — 7s hg Catt ae Ve es TM PT STANDA 
: ADCRESS. PLEASE REFLECT CHE ‘3 Bys fs. NON N ADDR ee O STREG" 


0000 
ftWwrre 


3. WRITE BITS 13,11,9,6 MAKE SURE THEY WRITE. 
4. WRITE BITS 12,10,8,4% MAKE SURE THEY WRITE. 
S. SET A/D START, MAKE SURE IT CLEARS, DONE FLAG SETS. 


BOI 


6. SET A/D START AGAIN, MAKE SURE ERROR FLAG SETS, 
7. MAKE SURE ERROR FLAG CAN BE CLEARED. 


fWwre 
RC CRC CRC IC CCRC RC IC RC RC CCC aC ab 


es yeaa." ' " anaagmsinnatimeamennapest ete sei ie tata op nae nites 
: CO 


, :OK-WHAT WE JUST DID IS ASKED THE 
ot ave MICRO-CODE TO wRITE THE CONTENTS 


ee ee ee ee ee ae ee be ee ee ee ee pe ee a ee ee 
eleva vee ve lvelvelvelvelvelvelvelvervelvelvervelvelvelveleeleslesleeleslesleelesleslesleslesleeleelss] 


07 
08 

08 005760 ooo0004 Ste 

11 005762 032737 oD0020 o0156e BIT #BIT4,SR1 ;IS THIS DEVICE SELECTED FOR TEST? 

12 :NOTE: DEFAULT=YES. 

13 005770 001002 BNE 10$ 

14 005772 000137 006436 IMP 7$ 

1S 005776 10S: 

1g 005776 005037 001126 CLR S$BDDAT 

18 + % MOV SBDDAT,@STREG2 ;/ PUT DATA FROM SBDDAT TO DEVICE REG STREG2 
20 
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DRLPA.P11 Tb 1/0 DEVICE TEST-AD11-K OPTION SEQ 0081 
{a4 it THE BBt IR’ Pace 48 RESBERG 19 11s 
1923 ADDRESS-THE SLAVE WIL SEND ug _4N 
1g8¢ ERROR, CODE, THAT, CAUSES U * madeline of asteeasasiy 
: ’ 
1927 00601 737 037532 TST SAERR ;DEVICE PRESENT? 
1386 BOE D IE 7483 BEQ 11 eto TOE 
1929 006020 104010 ERROR 10 18/0 #2 FAILED TO RESPOND 
1930 Qob0ee 000137 006436 IMP 7§ 0 ADOR. 
1333 11S: 
1333 5% MOV a TREG2,$BDDAT_  ;/READ_DEViCE REG STREG2,PUT DATA IN SBDDAT. 
i ? 2 190299 001126 BIC abr Tis! 'BIT7, SBODAT ; sCLEAR OUT FLAGS 
1332 861 i5e $4 $8 AT ;IS CSR ZERO? 
1337 006054 001402 BEG 1S 
1339 DOGOSE ERROR ” ;FAILED TO ZERO ADIIK CSR #2 
rent 012737 025100 001124 1$: MOV #BIT13!81T11!81T9!B1T6,SGDDAT ;NOW TRY A NEW BIT PATTERN 
1943 
1344 5% MOV SGDDAT,@STREG2 ;/ PUT DATA FROM SGDDAT TO DEVICE REG STREG2 
1 - v 7 RE VICE REG STREG2,PUT DATA IN S$BDDAT. 
22 pee sere yee ce ee a 
138 BBLS Bei ae ll 
1951 006126 104010 ERROR 10 ;FAILED TO wRITE #2 ADL1K CSR CORRECTLY 
135¢ 006130 oo0S46 BR TST7 +s 
1384 006132 012737 oO12420 001124 2$: MOV #BIT12!BIT1O!BITS!BITY,SGDDAT ;NOW TRY A NEW BIT PATTERN. 
igee 
1957 5% MOV SGDDAT,@STREG2 ;/ PUT DATA FROM SGDDAT TO DEVICE REG STREG2 
igeq . % MOV /READ DEVICE REG STREG2,PUT DATA IN S$BDDAT. 
130 006160 042737 100200 oo1126 ’ BIC Ger Tis1O117, $2008. j IGNORE FLAGS 
1961 006166 023737 001124 001126 CMP SBDDAT ;B81tS SET Ok? 
1a6¢ 006174 001402 BEQ $g0° 
1964 006 4010 RROR Nh) :FAILED TO WRITE #2 ADI1K CSR CORRECTLY. 
1365 OO EsO8 osee ER 1817 He 
1367 006202 005037 001124 3S: CLR SGDDAT ;NOW CLEAR ALL BITS SET 
1368 ;% MOV SGDDAT,JSTREG2 ;/ PUT DATA FROM SGDDAT TO DEVICE REG STREG2 
1971 5 MOV aSTREGe $BDDAT ;/READ DEVICE REG STREG2,PUT DATA IN SBDDAT. 
1972 042737 O00200 001126 BIC #8177, SBODAT IGNORE DONE FLAG. 
1973 006234 005732 001126 tot $B0DAt :CSR CLEAR? 


33 


ReBIaNod Pe 


VO 
~ 


Seas 


ee ee 
RRLoMNHo 


33 
a 


rrr rururrne 
Pattatatsttstetstetiststss=t4 
WONCU CW--OWON ftw bt = fr 


Rpeoeeoooeee fat={=t=] 


oO 
furu 
wre 


rurorunr 
O000 


| a | 


006274 


006312 
006320 


006322 
006324 
006326 


006354 
006362 
006370 
006372 


006374 


11- DRLPA-A 
T6 


104010 
000S00 


012737 
012737 


023737 
001402 


104010 
o0004S0 
012737 


012737 
023737 
001401 
104010 


005037 


042737 


0 
104010 


ooo001 


o00e00 


001124 


000001 


100200 
001124 


001124 


000200 
001126 


) 


001124 


001124 


001126 


001124 


001124 
001126 


001126 


4)_ 13-DEC-77 
EST-AD11-K OPTION 


Ss: 


6S: 


ERROR 
BR 


EO? 


12:58 PAGE Se 


QADBUF 2, MY TEMP 
#BITO, $GDDAT 


SGDDAT , ISTREG2 
#8177, $GDDAT 


@STREG2 , SBDDAT 
$GDDAT , SBDDAT 
> 


10 
TST7 
#BITO, SGDDAT 


SGDDAT , JSTREG2 


@STREG2, SBDDAT 


;#2 ADLIK CSR FAILED TO CLEAR. 


;/READ_ DEVICE REG ADBUF2,PUT DATA IN MYTEMP. 
:NOW WE’LL SET THE A/D START B 


;7 PUT DATA FROM SGDDAT TO DEVICE REG STREG2 
; WHEN AD CSR BACK EXPECT 
;START BIT TO CLEAR, DONE TO SET. 


;/READ DEVICE REG STREG2,PUT DATA IN SBDDAT. 
;START OK? 


;CSR BAR AFTER #2 A/D START 
:BIT O SHOULD CLEAR ONLY A/D DONE SET. 


RSI GONNe Bu ART ANOTHER 
MD "CONVE a ON WITHOUT ERODING 
; THE R S_OF THE a akoe cena * HIS 


5 SCRUSE THE ERROR 
FAS WELL AS THE DONE FLAG TO SET. 


;7 PUT DATA FROM SGODAT TO DEVICE REG STREG2 


AReaO. DEVICE REG STREG2,PUT DATA IN SBDDAT. 


#BITIS!BIT7,$GDDAT ;S/B 


SGDDAT , SBDDAT 
6$ 
10 


SGDDAT 
SGDDAT , JSTREG2 


aSTREGE $BDDAT 
7 SBODAT 


10 


@ADBUF 2 , MY TEMP 


;IS 1S AND 7 SET? 


;ERROR #2 ADLIK BIT 15 AND 7 SHOULD BE SET. 


;MAKE SURE ERROR FLAG CLEARS 
;7 PUT DATA FROM SGDDAT TO DEVICE REG STREG2 


;7READ DEVICE REG STREG2,PUT DATA IN SBODAT. 
; IGNORE DONE FLAG. 
:I1S CSR CLEAR? 


;AD1L1K CSR FAILED TO CLEAR. 


;7READ DEVICE REG ADBUF2,PUT DATA IN MYTEMP. 


SEQ 0082 


eal Fi "el DRLPA-A 
ORLPA. T6 


Shas 006446 o00004 
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pHa e aetna eee VICE TEST-KMLIX OPTION 





tkTE 1/0 DEVICE TEST-KW11K OPTION 

ef 

:#IN THIS TESt *S_170 BUS. 
;*WE HAVE A THE 
?#KMC-11 AND RCUITRY IS 
; #NOT 5 CK 

t*THE OI Tic I 

:*170 BUS. I 

ixIT FROM “SRI” PLAIN 

;8HOW TO_AQD 

;*#170 BUS THAT 

!#IF A FAILURE 

; XINDIVIOUAL DI 

a IN THIS face i EXERC Kul l-K, IF 

i eu 1S) UNeL A TER D,. cea INCE THE 

; PL ee NOTE: TH ehh a BRIEF TEST OF THE KW11K, 

te 79 THAT IT BuarL TESt NG, YOU 

i THE KW11-K bYagnostic. COMPLETE 

ii TESTS: ‘. MAKE SURE K KW11K RESPONDS TO ADDRESS 

te (NOTE KW11k ON YOUR 170 BUS USES A_NON 
is STANDARD ADDRESS. MODIFY "KWADO” WITH THE CORRECT ADOR. ) 
i 2. CLOCK A CSR BITS 14,9,6,3, AND 1 SET 

i# 3. CLOCK A CSR BITS 13,8 AND 2 SET 

is 4. CLOCK A CSR ZEROS. 

i# S. CLOCK B CSR BITS 11,6,4 AND 2 SET 

i 6. CLOCK B CSR BITS S,3, AND O SET 

i 7. CLOCK B CSR ZEROS 

;# 8. START CLOCK A MODE , RATE 1MHZ, 

te CHECK “ENABL R A* CLEARS 

i “MODE FLAG” ae OVERFLOW FLAG SETS 

5 9. CLOCK A CSR ZEROS 

; 10. START CLOCK B RATE 1MHZ 

tx CHECK “ENS CNTR B” CLEARS, “B OVERFL 

i FLAG” SETS 

| JE eenee renee eeeenneeeeeanes 


SEG 0083 


as, “veel wn” Se 


DRLPA:P 


2083 
2084 


B5E323 


rururururururururu rororuly fururururororururerulfurururufururorurufurvrururururur 
PALO ODO VE OV SOO VON LW DRIER Ee 


006450 


006572 
006600 


006602 
006604 


006610 


006634 
006640 


006642 
006644 


006650 


032737 
001002 
000137 


012737 


00S737 
001403 


104010 
000137 


023737 
001403 


104011 
0001 


012737 


023737 
001403 
104011 
000137 


008037 


005737 
001403 


104011 
000137 


012737 
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1/0 DEVICE TEST-KW11K OPTION 


oocode 001562 


0072S4 


041110 001124 


037832 


0072S4 


001124 001126 


0072S4 


o20404 001124 


001124 001126 


0072S4 
001124 


001126 


0072S4 
004124 001124 


10S: 


es: 


3$: 


BIT 
BNE 
JMP 
MOV 


MOV 


TST 
BEQ 


ERROR 
JMP 


MOV 


GO? 


12:58 PAGE S4 


#BIT1,SR1 


10$ 
11$ 


SE@ 0084 


;I1S_THIS DEVICE SELECTED FOR TEST? 
;NOTE: DEFAULT=YES. 


#BITL4!BITS!BIT6!BIT3,SGDDAT ; TEST THESE BITS 


SGODAT , IKWADRO 


SAERR 
les 


10 
11$ 


@JKWADRO , SBODAT 


ll 
118 


7 PUT DATA FROM SGDDAT TO DEVICE REG KWADRO 


:D1D KW 1K RESPOND 
519 8 a ieee yeey: 
3I NEXT 


TESt 
KWL IK FAILED TO rESPOND TO ADDR. 


;7READ DEVICE REG KWADRO,PUT DATA IN $BDDAT. 
rc cael ;DID THESE BITS SET? 


;KWI11K R/W CSR ERROR. 


#BIT13!BITS!BIT2,SGDDAT ;GET NEW PATTERN 
;7 PUT DATA FROM SGDDAT TO DEVICE REG KWADRO 


SGDDAT , JKWADRO 
@KWADRO , SBDDAT 
$SGDDAT , SBDDAT 
es 

11 

118 

$SGDDAT 
SGDDAT , JKWADRO 
JKWADRO , SBDDAT 
$SBDDAT 


ll 
118 


;7READ DEVICE REG KWADRO,PUT DATA IN SBODAT. 


;01D THE BITS SET? 


;KW11K R/W CSR ERROR. 


;WRITE ALL ZEROS. 
;7 PUT DATA FROM SGODDAT TO DEVICE REG KWADRO 


;7READ DEVICE REG KWADRO,PUT DATA IN S$B8DDAT. 
:D1D CSR _ CLEAR 
YES-GOOD. 


ata FAILED TO ZERO CSR. 


SBITLL!BITS!BIT4!B1T2,SGODAT ; TEST CLOCK B’S CSR. 


SGDDAT , JKWADRY 


;7 PUT DATA FROM SGDDAT TO DEVICE REG KWADRY 


MAINDEC -li- ORLPA-A 


ORLPA.P11 


a 
on 


006676 
006704 


bbe716 


006712 


Boers 
Bbe782 
0067S4 


007000 
007004 


007006 
007010 


por olE 
07020 


{ 
| 
| 
| 
| 

007056 

7064 

B72 

007074 

007076 


007 122 
007126 


ruroruorurururorururoruru rurororurorurorururu furu' furururorory rurururury rururu! 

SEPORRIB BOLI Y WO INSEE PEELE LADO MUND OIA ERTS EEE EY 
uw 

SSBLRRISN Ia Wal ZN dae eT O RE STEM ON SSSR LORE SS 


17 
023737 
001402 


b0861 


012737 


861482 
bb0s46 


005037 


00$737 
001402 


104011 
000Se1 


012737 
012737 


012737 


OE r8i 7 


104011 
005037 


005737 
001402 
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001126 


000050 


001124 


001124 


001126 


oode4e 
001124 


001124 


001126 


001124 


001124 


001126 


001124 
001126 


13-DEC-77 


3% 


, 


S$: 


6S: 


7$: 


MOV 


07 


12:58 PAGE SS 


@KWADRY,SBDDAT ;/7READ DEVICE REG KWADRY,PUT DATA IN SBDDAT. 
oe ae ;DID THE BITS SET OK? 

11 ;KWI11K CLK B CSR FAILURE. 
TSTiO ae 

#BITS!BIT3,SGODAT ; TRY THESE BITS 


SGDDAT,@KWADRY ;7 PUT DATA FROM SGDDAT TO DEVICE REG KWADRY 
ScoGRT, SBBDRY i ORBPB FEV AEF REG KWADR4Y,PUT DATA IN SBDDAT. 


$d ;KW11K-CLK B CSR ERROR 
T10 


$SGODAT ;ZERO CSR 
SGODAT,JKWADRY ;7 PUT DATA FROM SGDDAT TO DEVICE REG KWADRY 


@JKWADRY,SBDDAT ;/READ DEVICE REG KWADRY,PUT DATA IN SBDDAT. 
$BDDAT :DID CSR CLEAR? 


11 ;KWLIK-CLKB CSR ERROR. 
TST10 5 

wBy 70817) $GDDAT ;PUT “E CNTR A’ AND RATE IMHZ IN CSR 
#177777,$BDDAT ;PRELOAD CN 


SBDDAT,@KWADR1 ;7 PUT DATA FROM SBDDAT TO DEVICE REG KWADR1 
SGDDAT,@KWADRO ;7 PUT DATA FROM SGDDAT TO DEVICE REG KWADRO 
@KWADRO,SBDDAT ;/READ DEVICE REG ae PUT DATA IN SBDDAT. 


#BITS!BIT7!BIT1 SEER 87 oe vERABLE’ ons A) SET 


GQCOAT , SSOGRT fia: 


W11K 
ll Stock CSR A PROBLEM 
SGDDAT ; TRY CLEARING CSR 
SGDDAT,3KWADRO ;/ PUT DATA FROM SGDDAT TO DEVICE REG KWADRO 


JKWADRO,SBDDAT ;/READ DEVICE REG KWADRO,PUT DATA IN SBDDAT. 
$BDDAT ;DID CSR CLEAR? 


MAINDEC -1li- ORLPA-A 
DRLPA.P11 17 


rurururorururururururu 
DOR be eh be eee 
eit tat tat ites 


ed ee ed ee 
WON UI CWre 


PUvrerarererereranare 


rururorurorurururorul 
rm 
~ 


012737 
G 


00S037 


005737 
001401 


104011 
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000003 
000377 


000203 


001124 


001124 


001126 
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ERROR 11 ;CSR FAILED TO CLEAR 
BR TST10 Ss 
gS: MOV #BITL!BITO,SGDDAT ;SET “ENABL CNTR B” AND IMHZ IN CSR B 
MOV #377, $B0DAT ;PRESENT ENTR. 
5% MOV SBDDAT,JKWADRS ;/ PUT DATA FROM SBDDAT TO DEVICE REG KWADRS 
rT MOV SGDDAT,@KWADRY ;/ PUT DATA FROM SGDDAT TO DEVICE REG KWADRY 
; CLOCK SHOULD OVERFLOW,NOT CLEAR 
:"ENB CNTR B” AND SET 
:"8 OVERFL FLAG” 
:% MOV JKWADRY,$SBDDAT ;/READ DEVICE REG KWADR4Y,PUT DATA IN $BDDAT. 
MOV wBIT7 :8iT1281TO, $GDDAT ;EXPECT ONLY OVERFL FLAG SET 
CMP $GDDAT,$BDDAT °;CSR OK? 
BEQ 3S 
ERROR 11 ;KW11K CLKB COUNT UP ERROR. 
Qs: CLR SGDDAT ;TRY CLEARING CSR 
:% MOV SGDDAT, IKWADRY ;/ PUT DATA FROM SGDDAT TO DEVICE REG KWADRY 
:% MOV QKWADRY,SBDDAT ;/READ DEVICE REG KWADR4Y,PUT DATA IN S$BDDAT. 
TST $BDDAT :DID CSR CLEAR? 
BEQ TST10 33 
ERROR 11 ;KW11K CLOCK B SCR FAILED TO CLEAR. 
11$: 


; 1 ey ace eo ate ete ae a a ry 
; ATE *#TEST THE DRI1K OPTION,#1, IF “SR1” BIT 2=1(SET) 


PEIN wa yest WE ARE CHECKING OUT AN 470. OeviCre ON THE eat S_1/0 BUS. 


: VE A CERTAIN T NT _OF CONF IDENCE 7 HE MB2S4 (IPBM), THE 
:#KMC-11 AND THE DMC- IN TH Tie ARBITRATION CIRCUTTRY Is 
2 i CHECK, NOR THE vice’ £’S INT Leet LITIES. 

t eT I TEC 1s Ser FOR CERTAIN DEF DEVICES ON THE 

"I/ : HE VICE IS NOT 4 THe 170 BUS, DELETE 

:#IT FROM "SRI" (NOTE: AT THAT LOCATION, WE LIST CODES, AND EXPLAIN 

+ a TO DELETE OPTIONS) . IF YOU HAVE A DEVICE’ON THE 

#170 HAt NOT A DEF DEVICE AD IT To “SRI” 

:#IF A FAILURE OCCURS IN His TE YOU SHOULD RUN THE 

:*#INDIVIDUAL DIAGNOSTIC THAT EXERCISES THIS OPTION. 

!*IN THIS TEST WE WILL CHECK OUT DR11 #1 IF BIT 2 OF SRi=1 

!%(SET). ALSO, DATA LOOP BACK (OUTPUT DATA BACK TO INPUT) WILL BE CHECKED 


SEQ 0086 


JO? 
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DRLPA.P11 T10 *#TEST THE DRIIK OPTION, #1, IF “SRI” BIT 2=1(SET) SEQ 0087 

eeus ie BIT 2 =1 (SET). FOR THIS, YOU MUST HAVE INSTALLED A LOOP-BACK 

§ mJ OO mm i a ecnage iia ctl eictng ie: ce ip ws emer aiReee 

ee 7254 oo0004 +471 SCOPE 

224 7256 032737 OO00004 o01562 BIT #81T2,SR1 

2250 007264 001002 BNE 10$ ; 7-TDRT- 

2584 o37878 000137 007762 me IMP 11$ 

r $ 

552 007272 005037 001514 CLR .DVLS 

eeu 007276 005037 001124 CLR $GDDAT ;/SET TO xFERR ZEROS. 

geab ;% MOV $GDDAT,@DRCRI ;7 PUT DATA FROM SGDDAT To DEVICE REG DRCR1 

257 007312 005737 037532 TST SAERR :=1 IF DEVICE NOT PRESE NT 

ge58 007316 001403 BEQ 1$ ‘IF O, PRESENT, (CON’T 

2260 007320 104012 ERROR 12 ;DR11K #1 DID NOT RESPOND WHEN 

2261 ?ADDRESSED. “SRI” BIT 2 SELECTED 

gebe :THIS OPTION. ADDRESS “DRCR"1 

eeb3 :CONTAINS ITS ADDRESS 

gees 007322 000137 007762 IMP 118 

gob? 007326 1$: 

2269 3% MOV BORCRI, SBDDAT  ;/READ DEVICE REG DRCR1,PUT DATA IN SBDDAT. 

2270 007336 005737 001126 TST $BDDAT :DID CSR CLEAR? 

ge71 007342 001403 BEQ 2s 

2273 007344 104012 ERROR 12 ;DRI1K #1 CSR FAILED TO CLEAR. 

gerd 007346 000137 007762 IMP 11S 

ee? 007352 2s: 

sso ; MOV @DROAL,SGDDAT  ;/READ DEVICE REG DROAL,PUT DATA IN SGDDAT. 

2280 % MOV JORIAL.SGDDAT  ;/READ DEVICE REG DRIAL, PUT DATA IN SGDDAT. 

eee! 007372 012737 O40100 001124 MOV #B1T6!BIT14,SGDDAT ;LOAD WRITEABLE BITS: 

g 83 3% MOV SGDDAT,JORCR1 ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRCR1 

2285 5% MOV BORCRI, SBDDAT ;/READ DEVICE REG ORCR1,PUT DATA IN SBDDAT. 

ee8e go74e0 023737 001124 001126 CMP $GDDAT;$BDDAT ;DID BITS SET? 

e687 74 001403 BEQ 3$ 

2289 007430 104012 ERROR 12 ;DRI1K #1 CSR BIT(S) FAILED. 

e230 007432 000137 007762 IMP 118 

geese 007436 005037 001124 3S: CLR $GDDAT ;TRY CLEARING CSR. 

goad ;% MOV $GDDAT,IDRCR1 ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRCR1 

2296 3% MOV QORCR1,SBDDAT  ;/READ DEVICE REG DRCR1,PUT DATA IN SBDDAT. 

2297 007462 005737 001126 TST $BDDAT ?DID CSR CLEAR? 


2e98 007466 001403 BEQ 4$ : YES-NEXT TEST. 


KO? 
MACY11_27(6S4) 13-DEC-77 12:58 


nh — sions 1 : PAGE S8 
THE DRI1K OPTION,#1, IF “SR1” BIT e2=1(SET) 


DRLPA.P T10 *TES SEQ 008s 
2299 
2300 007470 104012 ERROR 12 ;DR11K #1 CSR FAILED TO CLEAR. 
2301 007472 000137 007762 IMP 11$ 
8303 007476 032737 000004 o01S64 4S: BIT #B1T2,SRe ;DOES_THIS DR11 HAVE A LOOP BACK 
‘CABLE CONNECTED TO IT? 

2305 007504 001526 BEQ TSTil : 

2308 Hs SR2 BIT2=1 THEN LOOP BACK. 
2308 007506 012737 OS2S525 001124 MOV #0S2525,SGDDAT ;SET FIRST PATTERN 

310 ; MOV SGDDAT,3DROAL ;/ PUT DATA FROM SGDDAT TO DEVICE REG DROAL 
2312 ; MOV aDRCRI SBDDAT ;/READ_DEVICE REG DRCR1,PUT DATA IN S$BDDAT. 
2313 75 012737 oo00200 001124 MOV #B1T7, $GDDAT EXPECT FLAGS TO SET. 

2314 007542 023737 O01126 001124 CMP $BDDAt, $GDDAT ID THEY? 
e315 007550 001402 BEQ cs : YES-CON’ 2 
e317 007552 104012 ERROR 12 ; DRI IK #1 FLAG(S) FAILED TO SET 

318 N DATA XFERRED. IS THE OUTPUT 
2319 iREALLY CALLED BACK TO THE INPUT? 

2320 007S5S4 oo0s02 BR TST11 HP 

eee 007556 012737 OS2S52S5 oO01124 SS: MOV #0S2525,$GDDAT ;PATTERN THAT SHOULD HAVE XFERRED. 

2324 5% MOV BORIAL,SBODAT  ;/READ DEVICE_REG DRIAI,PUT DATA IN SBDDAT. 
2325 007574 023737 001126 001124 CMP $BDDAT’SGDDAT :DATA SENT=DATA RECEIVED? 

2328 76 001402 BEQ 6S 
2328 007604 104012 ERROR 12 ;DRL1K #1 DATA XFERR ERROR. 
2329 007606 Oo04eS R TST11 :; 
2331 007610 6S: 
5335 :* MOV QDRCR1,SBDDAT  ;/READ DEVICE REG DRCR1, PUT DATA IN SBDDAT. 
2334 007620 005737 001126 TST $BDDAT ‘DID “OUTPUT FLAG" SET 
8335 007624 i00402 BMI ‘SHOULD HAVE. 
23 007626 104012 ERROR 12 ;DR11K #1, “OUTPUT FLAG” FAILED TO SET. 
2338 007630 O004S4 R TST11 t; 

e340 007632 7S: 
2342 5% MOV SGDDAT, ADRIAL / PUT DATA FROM SGDDAT TO DEVICE REG DRIAL 
e343 007642 012737 125252 001124 MOV #125252, $GODAT NEW PATTERN 
2345 ;# MOV SGDDAT,IDROAL ;/ PUT DATA FROM SGDDAT TO DEVICE REG DROAL 
2347 5% MOV DDRIAL,SBDDAT  ;/READ DEVICE REG, DRIA1,PUT DATA IN SBDDAT. 
2348 007670 023737 001126 001124 CMP $BDDAT’$GDDAT PATTERN XFERR OK? 

e349 007676 001402 BEQ 8S 

2351 007700 10401 RROR 1 ;DR11K #1 DATA XFERR ERROR 

2352 007702 Ooo042 ER tEr11 33 


2353 007704 


2387 007714 


007740 
2363 007744 


00774 
50775 


2368 007752 


S37 007762 


5334 007762 


OS 
e406 010026 
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005037 


005737 
001402 


bBasd8 


ooo0o04 


00S037 
005037 


005737 
001403 


104012 
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*#TEST THE OR11 Ik 


001124 


001126 


000040 001562 
010470 
001514 
001124 


037532 
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OPTION, #1, IF “SRI” BIT 2=1(SET) 

8$: 

;* MOV SGDDAT, eDRIAL ;7 PUT DATA FROM SGDDAT TO DEVICE REG DRIAL 
CLR SGDDAT ;NOW XFERR ZERO PATTERN. 

;% MOV SGDEAT , JDROAL ;7 PUT DATA FROM SGDDAT TO DEVICE REG DROAL 

* RY BRHRL-SBDORT RAG. REYBRFLERG REFALAEREEBRT® 1M 880087 
BEQ 98 
“te Er1) _ #1 DATA XFERR ERROR 

9$: 

;% MOV SGDDAT, JDRCR1 ;7 PUT DATA FROM SGDDAT TO DEVICE REG DRCR1 

118: 

2 a ENTE ORLIK OPTION a IF “SRI” BIT S=i(SeT) 

j ATE *#TEST THE DRI1K OPTION, #2, IF “SRI” BIT S=1(SET) 

SIN me TEST WE GKING gut AN 170 DEVICE ON THE noe S_170 BUS. 

Fai oe SARE Esl ae Bes airfGeeC ikea 2s 


INTE 

'xIT FROM” ihe TE: AT THAT ara nih 178 se “DELET XPLAIN 

i Ee DEL Fie E options). 1 00 Hive 2 one Bee 

:*IF A FAIL E OecuR SIN TH Top" Up Runt 

j INDIVIDUAL AGNOSTIC THAT E Retses THIS TION.» 

He THis Tes WE WILL CHECK OUT ORI 42 IF BITS Se ee 
Phe" Bit pare t T). AE OR HIS, Y Thu T A Kave FREUD EB 5 P50be BSCK 


SCOOT, sepnpeennsnnennnecansesssentenanonnsenneensnnneneeensess 


ian 
BIT #B1TS, SRI peer 
bit 193 . 
10S: 
CLR .OVLS 
CLR SGDDAT ;/SET TO XFERR ZEROS. 
;#* MOV $GDDAT, BDRCRE 37 P M ATA FROM SGDDAT yo DEVICE REG DRCR2 
~ TST AERR =1 EVICE NOT PRESENT 
BEQ 1$ tIF Oo PRESENT, (CON’T) 
ERROR 12 ;DR11K #2 DID NOT RESPOND WHEN 


SE@ 0089 


SSS ees ss s.Q°3°0°&0 
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Prrtererrrr rere ee ee 


OR BRON LO O00 VOU £O- ODS 


010030 
010034 
10044 
100S0 


0100S2 
0100S4 


010060 


010100 


010e4e 
010eS0 


T1l 


000137 


005737 
001403 


104012 
000137 


012737 


861483 
104012 
000137 


005037 


005737 
001403 
104012 
000137 
032737 


001526 


012737 


012737 
023737 


MACY11 27(6S4) 


#TEST THE DORIIK 


010470 


001126 


010470 


040100 


001124 


010470 
001124 


001126 


010470 
000040 


OSeSeS 


000200 
001126 


001124 


001126 


001564 


001124 


001124 
001124 


13-DEC-77 
OPTION, #e, 


1$: 


4$: 


12:58 PAGE 60 
IF “SR1” BIT S=1(SET) 


11$ 
JORCRe , SBDDAT 
$BDDAT 


le 
11$ 


@DROR2 , SGDDAT 
@DR1IA2, SGDDAT 


#81T6!81T14, $GDD 


S$GODAT , IDRCR2 
RCR T 

SebbAT; $BDoAT 

12 

11$ 

$GDDAT 

SGDDAT, IDRCR2 

JORCR2 , SBDDAT 

$B00AT 

4 

12 

11$ 

#BITS,SRe 

TsTle2 


#0S2SeS , SGDDAT 
SGDDAT , JDROA2 
apne seneet 


BIT7, $GD 
seopat. SeDDAT 


AT ;LOAD WRI 


SEQ 0090 


GATS OPTION. ADDRESS “DRCRTS 
:CONTAINS ITS ADDRESS 


;7READ DEVICE a DRCR2,PUT DATA IN S$BDDAT. 
;DID CSR CLEAR 


;DR11K #2 CSR FAILED TO CLEAR. 


;7READ DEVICE REG DROA2,PUT DATA IN SGDDAT. 


;7READ Device REG DRIA2,PUT DATA IN SGDDAT. 
EABLE BITS: 


7 PUT DATA FROM SGDDAT TO DEVICE REG DRCRe 
CF5PB DEVICE REG DRCR2,PUT DATA IN SBODAT. 


;DR11K #2 CSR BIT(S) FAILED. 


; TRY CLEARING CSR. 
;7 PUT DATA FROM SGDDAT TO DEVICE REG DRCR2e 
;7READ DEVICE REG DRCR2,PUT DATA IN SBDDAT. 


aR See TERT” 


;DR11K #2 CSR FAILED TO CLEAR. 
;DOES THIS DR11 HAVE A LOOP BACK 
:CABLE CONNECTED TO IT? 
tf SR2 BITS=1 THEN LOOP BACK. 
;SET FIRST PATTERN 
/ PUT DATA FROM SGDDAT TO DEVICE REG DROA2 


, (RED DEVICE REG DACRE, PUT DATA IN SBODAT. 
jEXPECT FLAGS TO SET 


NO? 


MACY11_27(654) PAGE 61 
Rl” BIT S=1(SET) 


~™ru 
10 
wo 
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DRLPA.P Til #TEST THE DRI1K OPTION, #2, I SEQ 0091 
e461 gies’ 01402 BEQsti‘é*SSS ; YES-CON’T. | 
2463 010260 104012 ERROR 12 ;DRI1K #2 FLAG(S) FAILED TO SET | | 
e464 HEN DATA XEERRED. IS THE OUTPUT | 
2465 IREALLY CALLED BACK TO THE INP 
e466 010262 o00so2 gR TST12 i 
e468 010264 012737 OS2525 001124 SS: MoV 8OS2S525,$GDDAT ;PATTERN THAT SHOULD HAVE XFERRED. 
| 
470 ;* Moy  @DRTAR, $BDDAT —; /READ_DEVICE REG DORIA PUT DATA IN $BDDAT. | 
71 010302 023737 001126 o01124 CMP  $BDDAT;$GDDAT DATA SENT=DATA RECEIVED? 
e472 010310 001402 BEQ 
e474 010312 104012 ERROR 12 ;DRI1K #2 DATA XFERR ERROR. 
e475 010314 0046s R TST12 i 
e477 010316 6S: 
2479 ;* MOV  @DRCR2,SBDDAT ; “READ DEVICE REG ORCR2,PUT DATA IN SBODAT. 
2480 010326 005737 001126 TST S$BDDAT !DID “OUTPUT FLAG” SET 
e481 010332 100402 BMI 4 ;SHOULD HAVE. 
2483 010334 104012 ERROR 12 ;DR11K #2, “OUTPUT FLAG” FAILED TO SET. 
e484 010336 O004S4 R TST12 i 
e486 010340 7$: 
2488 ;* MOV - SGDDAT,ORIA2 =; / PUT DATA FROM SGDDAT TO DEVICE REG DRIA2 
e489 010350 012737 12S2s2 o01124 MOV Bi25e52,SGODAT NEW PATTERN 
e431 MOV S$GDDAT,@DROA2 +=; PUT DATA FROM SGDDAT TO DEVICE REG DROA2 
2493 MOV QDRIA2,$BDDAT ; “READ DEVICE REG DRIA2,PUT DATA IN SBDDAT. 
2494 010376 023737 001126 001124 CMP  $BDDAT;$GDDAT ;PATTERN XFERR OK? 
e495 O10404 d0140e BEQStié#’S 
2497 10406 104012 ERROR 12 ;DR11K #2 DATA XFERR ERROR 
2498 O104i0 oo04e7 R TST12 3 
e499 010412 8S: 
2501 :* MoV SGDDAT,@DRIA2  ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRIA2 
2503 O10422 005037 001124 CLR _ SGDDAT ;NOW XFERR ZERO PATTERN. 
2505 MOV -« SGDDAT,3DROA2 =; PUT DATA FROM SGDDAT TO DEVICE REG DROA2 
2507 Mov  @DRIA2,SBDDAT ; “READ DEVICE REG DRIA,PUT DATA IN SBDDAT. 
2508 01044 005737 001126 TST $BDDAT DID ZERO PATTERN GET XPERRED? 
2509 O104S2 O0140e BEG 
2511 10454 104012 ERROR 12 ;DR11K #2 DATA XFERR ERROR 
e512 O104S6 O00404 R TST12 5 
2514 010460 9S: 


; 
! 


808 
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ORLPA.P11 11 *TEST THE DR1IK OPTION, #2, I re | T S=1(SET) SEQ 0092 
2515 
g218 ;% MOV SGDDAT,3DRCR2 ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRCR2 
e518 010470 11S: 
2520 j EAEMA SRNR EHR ET NTNE ORLIK OPTION @2, IF SRI" BIT 721(SET) 
e521 j ATE *TEST THE DRIIK OPTION, #2, IF “SRI” BIT 7=1(SET) 
2523 SIN THIS TEST KING QUT. aN igo VICE ON THE LPA-11’S 170 BUS. 
2524 WE HAV prey OF CONE TPaY tee ness (IPBM), THE 
2525 > #KMC=11 - eat: NSE ST Apait "ABETT RATION CIACUITRY IS 
2526 :#NOT C THE Devices iNT RRRUPT C ApABI Lit IES. 
2527 : *THE STAG TIc I 5 SE R cE TAIN PER AUL VICES ON THE 
2528 :#1/0 BUS. IF THE AUL THE 170 BUS, DELETE 
2529 :#IT FROM “SRI” (NOTE: AT of THON One IST CODES, AND EXPLAIN 
2530 :*HOW TO AND DELETE OPTIONS) IF You HAVE A DEVICE’ ON T 
2531 :#1/0 BUS THAT IS NOT A FAULT DEVICE, AD IT TO “SRI” 
2532 5 #IF A FAILURE OCCURS IN THIS TESt, YOU SHOULD RUN THE 
go33 3 SNOIVIDUAL DIAGNOSTIC THAT EXERCISES THIS OPTION. 
2535 j XIN THIS TEST WE WILL CHECK OUT DR11 83 IF BIT 7 OF SRI=1 
2536 5 SET). ALSO, DATA LOOP BACK (OUTPUT DATA BACK TO iNPUT) WILL BE CHECKED 
go37 Bid “SRe” Bit 7 =1 (SET). FOR THIS, YOU MUST HAVE INSTALLED A LOOP-BACK 
2539 SSTTTITTT TT TTT TTT TTT TT TT TT TT tt ttt ttt ttt ttt ttt itt t ttt ttttiitt 
2540 010470 oD00004 usie SCOPE 
2541 01047e 032737 000200 0015he BIT #81T7,SR1 
254 1 001002 BNE 10$ ;/-TORt- 
254 bi pepe 000137 011176 IMP 115 
2544 010506 10$: 
2545 0105 005037 001514 CLR .DVLS 
gee 010Si2 005037 001124 CLR $GDDAT ;/SET TO XFERR ZEROS. 
2548 3% MOV SGDDAT,@DRCR3  ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRCR3 
2549 010526 005737 037532 TST SAERR 331 IF DEVICE NOT PRESENT, 
e550 010532 001403 BEG 1$ ‘IF 0, PRESENT, (CON’T). 
2552 010534 104012 ERROR 12 ;DR11K #3 DID NOT RESPOND WHEN 
25 :ADDRESSED. “SRI” BIT 7 SELECTED 
2554 ‘THIS OPTION. ADDRESS “DRCR"3 
go56 *CONTAINS ITS ADDRESS 
e557 010536 000137 011176 IMP 11S 
2559 010542 1S: 
2561 ;% MOV BORCRS, $BDDAT ;/READ DEVICE REG DRCR3,PUT DATA IN SBDDAT. 
2562 O105S2 005737 001126 TST $BDDAT ‘DID CSR CLEAR 
e563 010556 001403 BEQ 2s 
2565 010560 104012 ERROR 12 ;DR11K #3 CSR FAILED TO CLEAR. 
e566 010562 000137 011176 IMP 11S 
2568 010566 2s: 


Pmo 


a SSS SS S < SS shS 
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2569 
2570 
2$71 


ef 


peer ELE ee 


2601 


Bae 


o 
Be 


PRES OP OOo 
NVR eee ee eee 
NVK-OWONC WU CWO 


tur 
Coo 


010606 


10764 
010766 


012737 


023737 
001403 


104012 
000137 


005037 


005737 
001403 


104012 
000137 
032737 
001S26 


012737 


046737 
023737 
001402 
104012 
o00S02 
012737 
023737 
001402 


104012 
000465 


O08 
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MACY11 27(654) 
OPTION, #3, IF “SRI” BIT 7=1(SET) 


#TESt THE DR11K 


;% MOV JDROAZ, SGDDAT 
3% [Ov 
040100 001124 MOV 
;% MOV SGDCAT , IORCR3 
;* MO RCR T 
001124 001126 C SOBER? SBbbaT 
BEG 3$ 
ERROR 12 
011176 IMP 11S 
001124 3$: CLR SGDDAT 
5% MOV SGDDAT, IDRCR3 
:% MOV QORCR3, SBDDAT 
001126 TST $BDDAT 
BEQ ao 
ERROR 12 
011176 IMP 11S 
000200 OO1S64 4S: BIT #B1T7,SRe 
BEQ TST13 
052525 001124 MOV #052525, SGDDAT 
; MOV SGDDAT , IDROAZ 
po0200 oo1124 *- Noy aon CRS seoNrT 
001126 861154 CMP sont, Sobor 
BEQ 
ERROR 12 
BR TST13 
O0S2525 001124 SS: MOV #052525, SGDDAT 
3% MOV RIA T 
001126 001124 CMP Seb eRT: Sebbat 
BEQ bs 
ERROR 12 
BR TST13 


;7READ DEVICE REG DROAZ,PUT DATA IN SGDDAT. 


SFr efi Te ScopAt REPBAD WAT TEABLE. Bife: UT oe 


;/ PUT DATA FROM SGDDAT TO DEVICE REG DRCR3 
;(READ DEVICE REG DRCR3,PUT DATA IN SBDDAT. 


;DR11K #3 CSR BIT(S) FAILED. 


;TRY CLEARING CSR. 
;/ PUT DATA FROM SGDDAT TO DEVICE REG DRCR3 
; (READ DEVICE REG DRCR3,PUT DATA IN SBDDAT. 

OES NEXT TEST. 

;DR11K #3 CSR FAILED TO CLEAR. 

;DOES THIS DR11 HAVE A LOOP BACK 

:CABLE CONNECTED TO IT 

tf SRe BIT7=1 THEN LOOP BACK. 

;SET FIRST PATTERN 

;7 PUT DATA FROM SGDDAT TO DEVICE REG DROA3 


;7READ DEVICE REG DRCRS, PUT DATA IN SBDDAT. 
Bib He 7 TO sET 


YES-CON’ T 
ORLIK * pF LRGs) FAILED TO SET 
;WHEN DATA XFERRED. IS THE OUTPUT 
;REALLY CALLED BACK TO tHE INPUT? 


;PATTERN THAT SHOULD HAVE XFERRED. 


SUPRP DAY EG REBEIORDMHT OAT® 4 seODAT. 


;DR11K #3 DATA XFERR ERROR. 


SEQ 0093 


08 
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| 
DRLPA. P11 Tl2 *#TESt THE DRIIK OPTION, #3, IF “SRI” BIT 7=1(SET) SEQ cosy | 
2623 011024 6$: | 
;% MOV JORCR3,SBDDAT  ;/READ DEVICE REG ORCR3, PUT DATA IN SBDDAT. 
2626 011034 005737 001126 TST $BDDAT :DID “OUTPUT FLAG” SET 
7 011040 100402 BMI 7$ *SHOULD HAVE. 
011042 104012 ERROR 12 ;DRI1K #3, “OUTPUT FI19G”" FAILED TO sET. 
2630 011044 oo004S4 BR T§T13 33 
gbie 011046 7$: 
2634 5% MOV SGDDAT apRiAg / PUT bATA FROM SGDDAT TO DEVICE REG DRIAZ 
011056 012737 125252 001124 MOV #125252, SGDDAT i NEW W PATTERN 
8637 5% MOV SGDDAT,DROAS ;/ PUT DATA FROM SGDDAT TO DEVICE REG DROAZ 
2639 5% MOV QDRIA3,SBDDAT ;/READ DEVICE REG, DRIA3,PUT DATA IN SBDDAT. 
2640 011104 023737 001126 001124 CMP SEODAT, "S$GDDAT ;PATTERN XFERR OK? 
e641 011112 001402 BEQ 
43 011114 104012 ERROR 12 ;DR11K #3 DATA XFERR ERROR 
2644 O11116 oO00427 BR TST13 35 
eb4s 011120 8S: 
42 ;% MOV SGDDAT,2ORIAS ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRIA3 
e649 011130 005037 001124 CLR SGDDAT ;NOW XFERR ZERO PATTERN. 
e651 ;% MOV SGDDAT,IDROAS + ;/ PUT DATA FROM SGDDAT TO DEVICE REG DROA3 
2653 ;% MOV QDRIAZ,SBDDAT  ;/READ DEVICE REG DRIA3, PUT paTA IN SBDDAT. 
gb 4 O11154 905737 001126 rot SDDAT ?DID ZERO PATTERN GET XFERRED 
2656 
e657 011162 104012 ERROR 123 ;DR11K #3 DATA XFERR ERROR 
2659 7 
e660 011166 9S: 
e662 5% MOV SGDDAT,IDRCR3 ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRCR3 
e664 011176 11S: 
2666 j SE ARMERHHHRRRRSEEETATNE DRLIK OPTION #4 IF SRI” BIT B=1(SET) 
8667 jATE *TEST THE DRIIK OPTION, #4, IF “SRI” BIT 8=1(SET) 
5253 by mg EE SEaW A nGUR PB cBHF Std PA Hes Bon. SrhK° 9S 
2671 Fo egg eRATION CIRCUITRY IS 
267 : NOT K it VICE’S & INT ERRRUPT CAP ABTL TT ie 
e673 Hy! Sieenactie Cc iss T oEvice } CE TAIN oeFALy ES ON THE 
2675 :*IT FROM ¢ —_ THA E odarion fst’8 SPLAIN 
2676 :*xHOW TO “arent nove Total gt IF You “Heit 3 nope: ono 


— 


E08 
13-DEC-77 12:58 


MACY11_27(6S4) PAGE 65 
IF “SRI” BIT 8=1(SET) 


MAINDEC -11- ie -A 
-Pll T13 


DRLPA *TEST THE DR11K OPTION, #4, 
2677 ;*170 BUS THAT IS NOT A 
2678 :#IF A FAILURE OCCURS IN THIS TE 
2673 ; INDIVIDUAL DIAGNOSTIC THAT EXE 
2681 
2682 *(SET). ALSO LOOP BACK (OUTPUT 
2683 xIF “SR2” BIT 8 “| tee). 
2684 ith BL 
2685 
2686 011176 oOo0004 +4713: SCOPE 
2687 011200 032737 OO00400 001562 BIT #81T8,SR1 
2688 011206 001002 BNE 10$ 
2689 O11210 000137 011704 IMP 115 
26 11214 10$: 
2691 Oiiei4 005037 001514 CLR .DVLS 
cb3e 11220 005037 001124 CLR $GDDAT 
2634 3% MOV $GDDAT , JDRCRY 
2695 011234 005737 037532 TST SAERR 
se 011240 001403 BEQ 1$ 
26 011242 104012 ERROR 12 
2699 
78 
5503 
8703 011244 000137 011704 IMP 11S 
270S 011250 1S: 
2706 
2707 3% MOV JDRCRY, SBDDAT 
2708 011260 005737 001126 TST $BDDAT 
6703 011264 001403 BEQ 
2711 O11266 104012 ERROR 12 
e7ie 011270 000137 011704 IMP 118 
2714 011274 25 
2715 
e716 ; MOV JDROAY , SGDDAT 
2718 :% MOV @DRIAY, SGDDAT 
e7is 011314 012737 oO40100 001124 MOV #B1T6!BIT14, $GDD 
e721 ; MOV $GDDAT, IDRCR4 
2723 ;% MOV BORCRY, $BDDAT 
2724 011342 023737 001124 001126 CMP $GDDAT; SBDDAT 
e7es 011350 001403 BEQ 3$ 
2727 011352 104012 ERROR 12 
e728 011354 000137 011704 IMP 11% 
2730 011360 005037 001124 3S: CLR $SGDDAT 


DEFAULT DEVICE 
ST, YOU CHOULD RUN THE 
Retses THIS OPTION. 

amy THIS TESt WE Hie CHECK our DR11 #4 IF BIT 8 OF SR1=1 


FOR THIS, YOU MUST HAVE INSTALLED A 


AT ;LOAD WRI 


SEQ 0095 


AD IT TO “SR1” 


K TO INPUT) ae BE CHECKED 


DATA BACK 
LOOP-BACK 


TTT TTT tT tT tT iti tit ttt titi tt ttt titiitttititititiiiiiiricers) 


;7-TORT- 


;7SET TO XFERR ZEROS. 


37 / PUT DATA FROM SGDDAT TO DEVICE REG DRCRY 
;=1 IF DEVICE NOT PRESENT, 
;IF O, PRESENT, (CON’T). 


;ORI1K #4 DID NOT RESPOND WHEN 
DDRESSED. “SR1” BIT 8 zebee TED 
THI OPTION. ADDRESS “DRCR™4 
;CONTAINS ITS ADDRESS 


“aos DRCR4Y,PUT DATA IN SBDDAT. 


‘2D 


;DR11K #4 CSR FAILED TO CLEAR. 


;7READ DEVICE REG DROAY,PUT DATA IN SGDDAT. 


;7READ re a TR ad ,»PUT DATA IN SGDDAT. 


;7 PUT DATA FROM SGDDAT TO DEVICE REG DRCRY 
;7READ DEVICE REG DRCRY,PUT DATA IN SBDDAT. 
:DID BITS SET? 

;OR11K #4 CSR BIT(S) FAILED. 


; TRY CLEARING CSR. 


FOS 


MaTNDEC -11- DRLPA-A MACY11 27(654) 13-DEC-77 12:58 PAGE 66 
ORLPA.P11 T13 *TEST THE DRIIK OPTION, #4, IF “SRI” BIT 8=1(SET) SEQ 0096 | 
2731 
3732 ;% MOV SGDDAT,IDRCR4Y ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRCRY 
2734 :% MOV QDRCRY,SBDDAT  ;/READ DEVICE REG DRCRY,PUT DATA IN SBODAT. 
2735 011404 005737 001126 TST $BDDAT *DID CSR CLEAR? 
6736 011410 001402 BEQ 4§ : YES-NEXT TEST. 
2738 O11412 104012 ERROR 12 ;DR11K #4 CSR FAILED TO CLEAR. 
6733 011414 000137 011704 IMP 11S 
2741 O11420 032737 OOOD400 001564 4S: BIT #BIT8,SRe ;DOES THIS DR11 HAVE A LOOP BACK 
2742 ‘CABLE CONNECTED TO IT? 
2743 011426 001526 BEQ TST14 : 
Hand ‘te SR2 BIT8=1 THEN LOOP BACK. 
ere 011430 012737 OS2S25 001124 MOV #0S2525,$GDDAT ;SET FIRST PATTERN 
cay 5% MOV SGDDAT,IDROAY ;/ PUT DATA FROM SGDDAT TO DEVICE REG DROAY 
2750 ;% MOV QORCRY , SBDDAT /READ DEVICE REG DRCRY, PUT DATA IN SBDDAT. 
2751 O114S6 012737 O00200 001124 MOV #8117, $GDDAT EXPECT FLAGS TO SET 
e75¢ 011464 023737 OOlle6 001124 CMP SBDDAT, gop RAT ID THEY? 
e753 011472 001402 BEQ cs tYES-CON’ T. 
2755 011474 104012 ERROR 12 ;DRI1K #4 FLAG(S) FAILED TO SET 
27 WHEN DATA XFERRED. IS THE OUTPUT 
275 REALLY CALLED BACK TO THE INPUT? 
6758 011476 oo00So2 BR TST14 +s 
e760 011500 012737 oOS2S25 001124 SS: MOV #0S2525,S$GDDAT ;PATTERN THAT SHOULD HAVE XFERRED. 
2762 5% MOV QDRIAY,SBDDAT  ;/READ DEVICE REG DRIAY,PUT DATA IN SBDDAT. 
2763 011516 023737 001126 001124 CMP $BDDAT;SGDDAT  :DATA SENT=DATA RECEIVED? 
e764 011524 001402 BEQ 6S 
27 11 10401 ERROR 1 ;DRL1K #4 DATA XFERR ERROR. 
e767 Bi 1eSB booses BR tr 1y ts 
6769 011532 6S 
2771 5% MOV @DRCRY,SBDDAT  ;/READ DEVICE REG DRCRY,PUT DATA IN SBDDAT. 
2772 011542 005737 001126 TST $BDDAT :DID “OUTPUT FLAG” SET. 
6773 011546 100402 BMI 7$ :SHOULD HAVE. 
2775 011550 104012 ERROR 12 ;DRL1K #4, “OUTPUT FLAG” FAILED TO SET. 
e776 011552 oo04s4 BR TST14 ts 
6778 011554 7$ 
2780 5% MOV $GDDAT,JORIAY ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRIAY 
6781 011564 012737 125252 001124 MOV #125252,$GDDAT NEW PATTERN 
2783 ;% MOV $GDDAT,JVROAY ;/ PUT DATA FROM SGDDAT TO DEVICE REG DROAY 


EE 


GO8 


M3INDEC -11- DRLPA-A MACY11_27(654) 13-DEC-77 12:58 PAGE 67 


DRLPA.P11 T13 ¥TEST THE DRIIK OPTION, #4, IF “SRI” BIT 8=1(SET) SEQ 0097 
2785 5% MOV GORIAY,SBDDAT ; “READ DEVICE REG DRIAY,PUT DATA IN SBDDAT. 
2786 011618 023737 001126 001124 CMP $BDDAT;$GDDAT PATTERN XFERR OK? 
$787 O11 001402 BEQ aS 
2789 011622 104012 ERROR 12 ;OR11K #4 DATA XFERR ERROR 
2790 011624 000427 BR TST14 ts 
e731 011626 8S: 

3733 :% MOV $GDDAT,JDRIAY  ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRIAY 
e736 011636 005037 001124 CLR $GDDAT ;NOW XFERR ZERO PATTERN. 

etd :% MOV SGDDAT,3DROAY ;/ PUT DATA FROM SGDDAT TO DEVICE REG DROAY 
27939 :% MOV QDRIAY,SBDDAT  ;/READ DEVICE REG DRIAY,PUT DATA IN SBDDAT. 
e800 011662 005737 001126 TST $SBDDAT ‘DID ZERO PATTERN GET xFERRED? 

2801 011666 001402 BEQ 98 

5805 011670 104012 ERROR 12 ;DR11K #4 DATA XFERR ERROR 

2804 011672 O00404 aR TST14 +5 

S80e 011674 cre 

2808 ;% MOV SGDDAT,JDRCRY ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRCRY 
e810 011704 11S: 

e8le eee eee EE THTNE DRLIK OPTION a2 IF “SRI” BIT G=1(SET) 

5814 j ATE &TESt THE DRIIK OPTION, #S, IF “SRI” BIT 9=1(SET) 

egis aN mts 1 TE tHE ARE CHE Ror CONE OUT_AN 170, Ue ON THE LegeLi's | S_ 170 BUS. 
5819 :*#KMC-11 AND The b= « fire Peta oF He" AREY TRATION CIRCUTTRY IS 
2818 :*#NOT CHECK vice’ ce’s 

2819 j #THE DIAGNOSTIC IS S uP FO FOR of TAIN "OEFAUL “bevices ON THE 

5851 :”xIT FROM ” aE BE : AT Phat ae WE (Ys CODES; BRD EXPLAIN 

esce ;#HOW TO AND DELETE OPTIONS You HAVE 8 rasa ON THE 

zon A HIRE Peete eae yeah ote Soin nt 

gees i EINOTVIDUAL DIAGNOSTIC THA oot ara TION. 

5e5e or Th aso. DATA LO Sanne Peu SATA, Bex 7 TO Of NBUTD WILL BE CHECKED 
e829 HHP ake" Bit fri (SET). AEOR oHIS. you T HAVE INSTALLED A LOOP-BACK 
2831 + RRR R RRR RRR REAR RR AH KEKE 

2832 011704 O00004 +6714: SCOPE 

2833 011706 032737 001000 oD1562 IT #81T9,SR1 

2834 011714 001002 BNE 10$ ; 7-TORT- 

2835 011716 000137 o1e41e IMP 118 

2836 011722 10S: 

2837 011722 005037 001514 CLR .OVLS 

2838 011726 005037 001124 CLR $GDDAT ;/SET TO XFERR ZEROS. 


08 
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DRLPA.P11 T14 *TEST THE ORIIK OPTION, #S, IF “SRI” BIT 9=1(SET) SEQ 0098 
840 5% MOV $GDDAT,3DRCRS ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRCRS 
41 011742 005737 037532 TST SAERR t=1 IF DEVICE NOT PRESENT, 
ee 011746 001403 BEQ 1$ [IF 0, PRESENT, (CON’T). 
eo4 011750 104012 ERROR 12 Boog aS DID_NOT T SP N 
ee PRE RSFTon Woof nthe 
coy? CON AINS ITS ADDRESS 
2849 0117S2 000137 o12412 IMP 11S 
2851 011756 1S: 
5% MOV QDRCRS,SBDDAT  ;/READ DEVICE REG DRCRS,PUT DATA IN SBDDAT. 
2854 011766 005737 001126 TST $BDDAT ‘DID CSR CLEAR? 
2855 011772 001403 BEQ 2g 
2857 011774 104012 ERROR 12 ;DR11K #5 CSR FAILED TO CLEAR. 
8 011776 000137 o12412 IMP 118 
2860 012002 2$ 
2862 5% MOV QDROAS,$GDDAT ;/READ DEVICE REG DROAS,PUT DATA IN SGDDAT. 
2864 5% MOV QORIAS,SGDDAT _;/READ DEVICE REG DRIAS,PUT DATA IN SGDDAT. 
e865 012022 012737 O40100 001124 MOV aI TETBITI a. $GDDAT ;LOAD WRITEABLE BITS: 
2867 :% MOV SGDDAT,JDRCRS ;/ PUT DATA FROM SGDDAT TO DEVICE REG DRCRS 
2869 5% MOV QDRCRS,SBDDAT ;/READ DO VICE REG DRCRS,PUT DATA IN SBDDAT. 
2870 012050 083737 001124 001126 CMP SGDDAT, *SBDDAT  :DID BITS SET? 
ee? 12056 001403 BEQ 
2873 012060 104012 ERROR 12 ;O0R11K #5 CSR BIT(S) FAILED. 
e874 012062 000137 o12412 IMP 118 
287 012066 005037 001124 3S: CLR SGDDAT ;TRY CLEARING CSR. 
287 5% MOV SGDDAT,IDRCRS ;/ PUT DATA FROM SGDDAT TO dEVICE REG DRCRS 
2880 5% MOV @ORCRS,SBDDAT ;/READ DEVICE REG DRCRS,PUT DATA IN SBDDAT. 
2881 012112 005737 001126 TST $BDDAT :DID CSR CLEAR? 
eese 012116 001403 BEQ 4g : YES-NEXT TEST. 
2884 012120 104012 ERROR 12 ;DR11K #5 CSR FAILED TO CLEAR. 
e885 Olelee 000137 o1e41e IMP 118 
2887 012126 032737 OO01000 O01564 4S: BIT #BIT9,SR2 ;DOES THIS DRIL HAVE A LOOP BACK 
2888 :CABLE CONNECTED TO IT? 
2889 012134 001526 BEQ TSTIS : 
30 ite SR2 BIT9=1 THEN LOOP BACK. 


e8Se 012136 012737 OSeSeS o01124 MOV #0S52525,$GDDAT ;SET FIRST PATTERN 


MAINDEC -11- ORLPA-A 
ORLPA.P11 T14 


CpELEEErEr 


DD DDD iD 
aa 
wo NOU rwrw-ODS 


012370 


012737 


104012 


oo0so0e 
012737 
023737 
001402 


104012 
000465 


00$737 
100402 


104012 
o0004S4 


012737 


023737 
001402 


104012 
000427 


005037 


005737 


MACY11_27(654) 


#TEST THE DRIIK 


ood2e00 O01 
0011e6 O01 


OSeSes 001124 


001126 001124 


001126 


leSeSe 001124 


001126 OO11e4 


001124 


001126 


13-DEC-77 le: 
OPTION, #S, IF * 
3% MOV 
7* MOV 
MOV 
CMP 
BEG 
ERROR 
BR 
S$: MOV 
;* MOV 
CMP 
BEQ 
ERROR 
R 
6S: 
3% MOV 
TST 
BMI 
ERROR 
R 
7$: 
& MOV 
MOV 
;* MOV 
£ MOV 
CMP 
BEQ 
ERROR 
R 
8$: 
:# MOV 
CLR 
: MOV 
7% MOV 
TST 


8 PAGE 69 
"SR1” BIT S=1(SET) 


SGDDAT , JDROAS 


TST1S 
#052525 , SGDDAT 


@DRIAS, SBODAT 
SBDDAT, , SGDDAT 


l2 
TST1S 


@ORCRS , SBODAT 
DAT 


NA 


TST1S 


$GDDAT, ADRIAS 
#125252, $GDDAT 


SGDDAT, ADROAS 
JORIAS, SBDDAT 
SBODAT, SGDDAT 


le 

TST1S 
$GDDAT , IORIAS 
SGDDAT 
$GDDAT , JDROAS 
@JORIAS, SBODAT 
SBDDAT 


;7 PUT DATA FROM SGDDAT TO DEVICE REG DROAS 


/READ DEVICE -e eo, PUT DATA IN SBDDAT. 
;EXPECT F FLAGS TO SET 


i YES-CON’ t. 


;ORL1K os FLAG(S) FAILED TO sET 
:WHEN DATA XFERRED. IS THE OUTPUT 
; REALLY CALLED BACK TO THE INPUT? 


;PATTERN THAT SHOULD HAVE XFERRED. 


;/READ DEVICE REG DRIAS,PUT DATA IN SBODAT. 
:DATA SENT=DATA RECEIVED? 


;DR11K #S DATA XFERR ERROR. 


e. 
* 


;/READ DEVICE REG DRCRS,PUT DATA IN SBDDAT. 
‘DID “OUTPUT FLAG” SET. 

;SHOULD HAVE. 

;ORL1K #5, 


“OUTPUT FLAG” FAILED TO SET. 


;7_PUT DATA FROM SGODAT TO DEVICE REG DRIAS 
;NEW PATTERN 


“ PUi DATA FROM SGDDAT TO DEVICE REG DROAS 
READ DEVICE REG DRIAS,PUT DATA IN SBDODAT. 
:PATTERN XFERR OK? 


;DR11K #S DATA XFERR ERROR 
;7 PUT DATA FROM SGDDAT TO DEVICE REG DRIAS 
;NOW XFERR ZERO PATTERN. 


;7 PUT DATA FROM SGDDAT TO DEVICE REG DROAS 


; “READ DEVICE REG DRIAS,PUT DATA IN S$BDDAT. 
:DID ZERO PATTERN GET XFERRED 


eee Tr me 


DRLPA 
2947 012374 


2943 012376 
2350 012400 


012402 


2956 Ole4le 


aa 


: 


001402 
104012 
000404 


ooco04 
032737 


001002 
000137 
005037 
005737 
001403 
104014 
000137 


042737 
001403 


MACY11_27(654) 
*#TEST THE DR1I1K 


oocoid 001562 
013442 
001124 


037532 


013442 


000200 001126 


JO8 
-77 12:58 


C PAGE 70 
N,#S, IF “SRI” BIT 9=1(SET) 
BEG 9S 


ERROR le ;OR11K #S DATA XFERR ERROR 
BR TST1S eg 


13-DE 
OPTIO 


;% MOV $GDDAT,aDRCRS ;/7 PUT DATA FROM SGDDAT TO DEVICE REG DRCRS 


11$: 
: j SEREMELERENRH HERR RENEE LL OPTION, IF SRI" BIT 21 (SET) 
; ATES “#TEST THE AA-11 OPTION, IF “SR1” BIT 3=1 (SET) 


SIN THIS TESt WE ARE CHECKING OUT rhe wee A ON THE yen S_1/70 BUS. 
;*WE HAVE A CORTAEN AMOUNT OF CONF sty Tie T 


(IPBM), THE 

;#KMC-11 AND ONC- 1 WORK. IN THIS ITRATION CIRCUITRY IS 
HSIN DIAGN oe Pet ee INTE RaUF TRIN DEF eiLTHES. ON THE 
DEV CE IS NOT ON te 170 BUS, DELETE 


Cc 
;#170 BUS. HE 
:*%IT FROM “SRI” ( A T LOCATION 5 CODES, AND EXPLAIN 
:*#HOW TO LET OPTIONS) . IF YOU A DEVICE ON THE 
: HAT DEFAULT vice, AD IT TO "SRI" 
eI IN, THE TES SHOULD RUN THE 
?¥INDIVIDUAL DIAGNOSTI cree see’ THIS OPTION. 


?#IN THIS TEST WE WILL CHECK OUT THE AA-11 OPTION, 
jxIF BIT 3 OF “SRI” IS SET 


PCr ies 14 telelelelelteellleeaieelee eel 
+ist SCOPE 
BIT #BIT3,SR1 ;IS AA-11 SELECTED 
BNE 20$ :IF =0, NO, SKIP THIS TEST. 
IMP 19$ 
20S: 
CLR S$GDDAT 
;% MOV $GDDAT,JAACSR ;/ PUT DATA FROM SGDDAT TO DEVICE REG AACSR 
TST SAERR :DID WE SUCCESSFULLY WRITE THE AA-11? 
BEQ 1$ :YES IF SAERR=0 
ERROR 14 jEAILED TO ADDRESS AA-11. “SRI” BIT 3=1 
;SELECTED THIS TEST. AA-i1 ADDRESS IS 
:IN LOC “AACSR” 
IMP 19S 
1$: 
5% MOV JAACSR,SBDDAT ;/READ DEVICE REG AACSR,PUT DATA IN SBDDAT. 
BIC #8177, $B8DDAT >CLEAR 
BEQ 2s :DID RoR CCEAR? 


MAINDEC 
DORLPA.P 


3001 
3002 
3003 
30 


B8S8ssoossssse5 
ODDO EWN ODD IRE 


SEReBUy UPN 


-11- DRLPA-A 
ll T1S 


012500 
01eS0e 


012S06 


104014 
000137 


012737 


104014 
000137 


012737 


042737 
023737 
001403 


104014 
000137 


005037 


042737 
001403 


104014 
000137 


012737 


023737 
001403 


104014 
000137 


MACY11_27(654) 


#TESt THE AA-11 


013442 
005124 


000200 
001124 


013442 
002012 


000200 
001124 


013442 
001124 


000200 


013442 
o00SeSe 


001124 


013442 


001124 


001124 


001126 


001124 


001126 


13-DEC-77 


2s: 


38: 


4$: 


ERROR 
JMP 


MOV 


MOV 


KO8 


12:58 PAGE 71 
OPTION, IF “SR1” BIT 3=1 (SET) 


14 
19$ 


#5124, SGDDAT 
SGDDAT, JAACSR 
JAACSR, SBDDAT 
#B1T7, SBDDAT 
$GDDAT, SBDDAT 
3$ 

14 

19S 

#2012, SGDDAT 
SGDDAT , JAACSR 
BAACSR, SBDDAT 


#B1T7, $BDDAT 
$GDDAT , S$BDDAT 


14 

19$ 

SGDDAT 
SGDDAT , JAACSR 


JAACSR, SBDDAT 
#8117, $B0DAT 


14 
19S 

#5252, SGDDAT 
SGDDAT, JDACO 
QDACO, SBDDAT 
SGODAT, SBDDAT 


14 
19$ 


$GDDAT , JDAC1 


;CLEAR CSR FAILED (AA-11K) 


; TRY WRITING THESE BITS 

;7 PUT DATA FROM SGDDAT TO DEVICE REG AACSR 

/READ DEVICE REG AACSR,PUT DATA IN SBDDAT. 
HEM BACK 


; ID_OF FL 
;DID PATTERN 
EST 


;TRY NEW PATTERN. 
:/ PUT DATA FROM SGDDAT TO DEVICE REG AACSR 
; READ DEVICE REG AACSR,PUT DATA IN SBODAT. 
oto PATTERN. X 
ES 


; TRY TO CLEAR CSR. 
;7 PUT DATA FROM SGDDAT TO DEVICE REG AACSR 


;7READ DEVICE m6 AACSR,PUT DATA IN SBDDAT. 


;CLEAR FLAG BI 


;AA-11K CSR FAILED TO CLEAR. 


;AAL1-K PATTERN 5124 FAILED TO W/R PROPERLY. 


;AR-11K PATTERN 2012 FAILED TO W/R PROPERLY. 


;7 PUT DATA FROM SGDDAT TO DEVICE REG DACO 
;7READ DEVICE REG DACO,PUT DATA IN SBDDAT. 


;AA-11K DACO FAILED TO SET PATTERN SeSe. 


;7 PUT DATA FROM SGDDAT TO DEVICE REG DACIL 


SEQ 0101 


3034 
3095 


tet et attend wt ote 
TT TT eT a 
DITRLOV— ODDIE 


1 
012760 
012766 
012770 


012772 
012776 


1l- ORLPA-A 
T1S 


023737 
001403 


104014 
000137 


023737 
001403 


104014 
000137 


023737 
001402 


104014 
O00S6S 


012737 


023737 
001402 


104014 
ooos44 


023737 
001402 


104014 
000S26 


MACY11 27(654) 
*#TES 
001126 001124 


013442 


001126 001124 


013442 


O01i1le6 001124 


O0eSeS 001124 


001124 001126 


001126 001124 


THE AA-11 


10$: 


11$: 


LO8 


8 es 72 
Rl” BIT 3=1 (SET) 


QDAC1, S$BDDAT 
SBODAT, SGDDAT 


14 
19$ 


SGDDAT, ADAC2 
JDAC2 , SBDDAT 
$BDDAT, SGODAT 
14 
19S 

SGDDAT, IDAC3 


acs $BDDAT 
$800 +, SGDDAT 


+2 

ST16 

#2525, SGDDAT 
$GDDAT , JDACO 


QDACO, SBDDAT 
SGDDAT, SBODAT 


14 
TST16 


$GDDAT, JDAC1 


DAC1, SBDDAT 
BRDAT ScDDAT 
11$ 

14 

TST16 


SGDDAT , IDAC2 


;/READ DEVICE REG DAC1,PUT DATA IN S8DDAT. 
: YES- 
;AA-11K DAC1 FAILED PATTERN S252 


;7 PUT DATA FROM SGDDAT TO DEVICE REG DACe 
A a DEVICE REG DAC2,PUT DATA IN SBDDAT. 


;AA-1L1K DAC2 FAILED PATTERN SeS2 


;/ PUT DATA FROM SGDDAT TO DEVICE REG DAC3 
; READ DEVICE REG DAC3,PUT DATA IN SBDDAT. 
‘PATTERN OK? 


;AA-11K DAC3 FAILED PATTERN SeS2 


** 
s° 


;7 PUT DATA FROM SGDDAT TO DEVICE REG DACO 
;7READ DEVICE REG DACO,PUT DATA IN SBDDAT. 
; OK? 

;AA-11K DACO FAILED TO SET PATTER 2525 


;7 PUT DATA FROM SGDDAT TO DEVICE REG DACI 
ioRae DEVICE REG DAC1,PUT DATA IN SBDDAT. 
3s YES- 

;AA-11K DACL FAILED PATTERN eSeS 


;7 PUT DATA FROM SGDDAT TO DEVICE REG DACe2 


SEQ 0102 


08 


— _ — —— 
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DRLPA.P11 TiS *#TESt THE AA-11 OPTION, IF “SRI” BIT 3=1 (SET) SEQ 0103 
3493 ;% MOV QDAC2 , $BDDAT ;/READ DEVICE REG DAC2,PUT DATA IN SBDDAT. 
3111 013206 023737 001126 001124 CMP $BDDAT,€GDDAT  ;0K? 
3ile 013214 001402 BEQ 12$ 
3118 013216 104014 ERROR 14 ;AA-11K DAC2 FAILED PATTERN 2525. 
4 a) 
3116 
3117 013222 12$: 
318 5% MOV SGDDAT , ADAC3 ;/7 PUT DATA FROM SGDDAT TO DEVICE REG DAC3 
3132 p1 3848 983737 001126 001124 “ cn Suppat, ScDDAT SORE TERN ORS” an ne eee es 
1 1402 £Q 1 ’ . 
HE 
3125 013252 104014 ERROR 14 ; AB 11K DAC3 FAILED PATTERN. 
gle? 013254 000472 BR TST16 5 
31¢9 013256 012737 OO0000 001124 13S: MOV #0, SGDDAT 
3131 5% MOV $GDDAT , DACO ;7 PUT DATA FROM SGDDAT TO DEVICE REG DACO 
3133 :% MOV QDACO, SBDDAT ;/READ DEVICE REG DACO,PUT DATA IN SBDDAT. 
3134 013304 023737 001124 001126 CMP $GDDAT, $BDDAT 
3135 013312 001402 BEQ 14$ ; 0K? 
3137 013314 104014 ERROR a ;AA-11K DACO FAILED TO SET PATTERN O 
3139 s,s 
3140 013320 14S: 
give 5% MOV $GDDAT, JDAC1 ;7 PUT DATA FROM SGDDAT TO DEVICE REG DAC1 
3144 5% MOV QDAC1 , SBODAT ;/READ DEVICE REG DAC1,PUT DATA IN SBDDAT. 
314S 013340 023737 001126 001124 CMP $BDDAT,SGDDAT  ;0K? 
3ié 013346 001402 BEQ : YES- 
3148 013350 1oWoL4 ERROR ee ;AA-11K DAC] FAILED PATTERN O 
3150 wi 
3151 013354 15S: 
3153 5% MOV $GDDAT, aDAC2 ;/ PUT DATA FROM SGDDAT TO DEVICE REG DAC2 
3155 ;% MOV QDAC2, SBDDAT ;/READ DEViCE REG DAC2,PUT DATA IN S$BDDAT. 
3156 013374 023737 001126 001124 CMP $BDDAT,SGDDAT 0K? 
3157 013402 001402 BEG 16$ 
3153 013404 104014 ERROR ;AA-11K DAC2 FAILED PATTERN O 
3161 sie 
3162 013410 16S: 





alee Fi —_— ~~ 


DRLPA.P 


WW WWWWWWWWWWWWWWWWWWWWWWWWWW) 


ae ae ae ae te be be ae ee ae ee be ee ae be ae ee ae ae ae he ee ee be he 


tf 
Nee en SSE TRISTAN ESSE ESSE | 


WWWWWWWWWWW) 


32 
32093 


013430 


013436 
013440 


013442 


o00 OOOO 
See Ree 
‘ tatatattl 
Rainy 


wtc £ 
oor tf 


023737 


001401 
104014 


ooo004 
032737 
001002 
000137 


005037 
005037 


005737 


104015 
o000Se1 
012737 


MACY11_27(654) 
#TEST THE AA-11 


001126 001124 


oo2000 001562 


0i401e 


001126 
001124 


037532 


014012 


000200 001126 
601124 
001126 


025100 001124 


NOS 


13-DEC-77 12:58 PAGE 7 
OPTION, IF “SR1” BIT 5-1 (SET) 
;% MOV $GDDAT , JDAC3 ;/ PUT DATA FROM SGDDAT TO DEVICE REG DAC3 
:% MOV 3DAC3, SBDDAT ;ZREAD DEVICE REG DAC3,PUT DATA IN SBDDAT. 
CMP S$BDDAT,S$GDDAT ;PATTERN OK? 
BEQ TSTib 3: 
ERROR 14 :AA-11K DAC3 FAILED PATTERN O. 


9S: 
 Souquesusannengeanenescesusenvenenecgynstenseseannanneeeaanees 


ikTE 


1/0 DEVICE TEST-AR11 OPTION 


"LEN e LC RRRREEHE ERM G NES ENEERSE EE SHEREEESSHSEEEEEEEEEOEENEEEEE 


+éT16: SCOPE 
BIT 
BNE 
IMP 


CLR 
CLR 


s¢ MOV 


10S: 


11$: 


1$: MOV 


#B1T10,SR1 ;IS_THIS pevits SELECTED FOR TEST? 
;NOTE: DEFAULT=YES. 

10$ 

7$ 

SBODAT 

SGDDAT 

SBDDAT,IARADS ;/ PUT DATA FROM SBDDAT TO DEVICE REG ARADS 
;OK-WHAT WE JUST DID IS ASKED THE 
;SLAVE MICRO-CODE TO WRITE THE CONTENTS 
;OF THE AR11 CSR TO ZEROES. 
; IF THE ARI1 ERILS TO rESPOND TO ITS 
;ADDRESS-THE SLAVE WILL SEND US AN 
;ERROR CODE THAT CAUSES US TO SET SAERR=1 
;IN THE SUPPORT ROUTINES. 

SAERR s DEVICE till 

11$ 3 YES~ CONTINUE 

1S 96 A FAILED TO RESPOND 

7$ TO ADDR. 


QARADS, SBDDAT ;/READ DEVICE REG ARADS,PUT DATA IN SBDDAT. 
48177, SBDDAT ?CLEAR OUT FLAG 


$GOD 
SB00AT ;IS CSR ZERO? 

15 ;FAILED TO ZERO AR11 A/D CSR 
#BITI3Z!BIT11!:BIT9!BIT&,SGDDAT ;NOW TRY A NEW BIT PATTERN 


$GDDAT , JARADS ;7 PUT DATA FROM SGDDAT TO DEVICE REG ARADS 


SEQ 0104 


013744 


013762 


014000 
014006 


014010 
014012 


012737 


042737 
023737 
001402 


104015 
000451 


005037 


104015 


000427 


012737 


012737 


023737 
001401 


104015 


o0e4e20 


000200 
001124 


001124 


000200 


001126 


ooo001 


000200 


001124 


001124 


001126 


001124 


001124 


001126 


13-DEC-77 
T-AR11 OPTION 


BOS 


12:58 PAGE 75 


5% MOV QARADS,SBDDAT  ;/READ DEVICE REG ARADS,PUT DATA IN SBODAT. 
BIC #8117, $BDDAT : IGNORE FLAG 
CMP $GODAT,SBDDAT ;BIT SET OK? 
BEQ 
ERROR 15 ;FAILED TO WRITE ARI1 A/D CSR CORRECTLY 
BR TSTi7 33 
2S: MOV #BIT1O!BIT8!BIT4,SGDDAT ;NOW TRY A NEW BIT PATTERN. 
5% MOV $GDDAT,IARADS ;/ PUT DATA FROM SGDDAT TO DEVICE REG ARADS 
; MOV QARADS,SBDDAT ;/READ DEVICE REG ARADS,PUT DATA IN SBDDAT. 
BIC #8177, $B8DDAT : IGNORE FLAG 
CMP SGDDAT,SBDDAT ;BITS SET OK? 
BEQ 3$ 
ERROR 15 ;FAILED TO WRITE #’NY’ ADLIK CSR CORRECTLY 
BR TST17 33 
3$: CLR SGDDAT ;NOW CLEAR ALL BITS SET 
; MOV SGDDAT,IARADS ;/ PUT DATA FROM SGDDAT TO DEVICE REG ARADS 
3% MOV QARADS,SBDDAT  ;/READ DEVICE REG ARADS,PUT DATA IN SBDDAT. 
BIC #8177, $8DDAT ? IGNORE DONE FLAG. 
TST $BDDAT ;CSR CLEAR 
BEQ 
ERROR 15 ;AR11 A/D CSR FAILED TO CLEAR. 
R TST17 ts 
4$: 
5% MOV @ARADB,MYTEMP ;/READ DEVICE REG ARADB,PUT DATA IN MYTEMP. 
MOV #8170, $GDDAT ‘NOW WE'LL SET THE A/D START BIT. 
:% MOV S$GDDAT,DARADS ;/ PUT. DATA FROM SGDDAT TO DEVICE REG ARADS 
MOV #8177, $GDDA + WHEN READ CSR BACK EXPEC 
:START BIT TO CLEAR, DONE TO SET. 
5% MOV QARADS,SBDDAT  ;/READ DEVICE REG ARADS,PUT DATA IN SBDDAT. 
CMP $GDDAT,SBDDAT  ;START OK? 
BEQ TST17 +3 
ERROR 15 ;CSR BAD AFTER A/D START 
sia ‘BIT O SHOULD CLEAR ONLY A/D DONe SET. 


55 HERE AE AEA HE HE HE He HE HE HE HE Me HE HE HEH HE HE HE HEHE HEE HE HE HEHE HE EE EEE REE E RE 
;*TESt 17 170 DEVICE TEST-AR11 CLOCK OPTION 





rna 


MAINDEC -11- DRLPA-A 


DRLPA.P11 


014012 
014014 


014022 
014024 
014030 


WW 


ee 


014030 


WWWWWWWWI) 
WW WWWWWh) 3 
WONTUCWM-OW 


3 


33ee O1404%6 
3323 0140Se 


T17 


oooco4 
032737 
00100 
00013 


012737 


005737 
001403 
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002000 


014354 


040130 


037532 


001562 


001124 


CO3 
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SIN THIS TEST WE ARE CHECKING OUT AN 1/0 DEVICE ON THE LPA-11’S I/70 BUS. 


it rileano fee ohowiy boa, (THis fest Tue AebyiRAriON ciAcUitRY 1s 


TPS BEM He cP PoE OREN, AB OGEAVAD SSUES 8TH 
Sy Rabe ibe inert yu iw Poli oh 


HAIFO a PRILUREOSCURG. JN THIS. TERI YOU, SHoULR Buy THe 


IN THIS TEST WE WILL grt y THE AR11 CLOCK. IF 


SR1 IS_UNALT D. +} TEST SINCE THE 

Rd AK IS A DEF Dev 

PL NOTE: TH T13/ RIEF TESLING 8G, THE AR11, 
TO SEE THAT IT ROUGHLY HORKS. You 
MUST RUN THE ARI 


OU 
1 DIAGNOSTIC; COMPLETE 
1 


TESTS: ° ey sume 1 RESPONDS TO ADDRESS 
gh ; T aRTi ON YOU 170 BUS USES_A 


a. CLOCK CSR BITS 14,6,3, AND 1 SET 

3. CLOCK CSR BITS 8 AND 2 SET 

4. CLOCK CSR ZEROS. 

s. arpa t SOse a moor 0, <StEARS, 
“Ar OVERFLOW FLAG” SETS 

6. CLOCK A CSR ZEROS 


no 8 HORROR ROI IO ICICI IC ICRC CIC IRC IC IC MC a ORC OC aC a 


Pe eee ee ee ee ee OH es ee OF Eee eee Os eres ee 


er agg <a mit te aan at a NEP 


BIT #BIT10,SR1 ;IS_ THIS DEVICE SELECTED FOR TEST? 
:NOTE: DEFAUT=YES. 
BNE 10$ 
JMP 118 
108: 
MOV #BIT14!BIT6!BITY!BIT3,SGODAT ; TEST THESE BITS 
;% MOV $SGODAT, JARCS ;7 PUT DATA FROM SGDDAT TO DEVICE REG ARCS 
TST SAERR ;DID ARI 1 RESPOND 
BEQ 12$ :TO ADDR? SAERR=0? 


;IF YES-NEXT TEST. 


/ 


SS, MODIFY “ARADS” WITH THE CORR 


SEQ 0106 


SINRES i “i> OAL 


4954 104 
3385 BGS ABUDIE 
14 
3328 
3329 
3330 
3331 014072 023737 
335 014100 001403 
014102 104015 
3335 O14104 000137 
3337 14110 012737 
3338 
383 
aT 
3342 
3343 014136 023737 
ae 014144 001403 
3346 014146 104015 
3342 O141S0 000137 
3349 014154 005037 
3350 
3353 
3354 014200 012737 
3355 014206 023737 
3356 014214 001403 
258 Bius38 Agso4s 
14 Ol 
3360 
See Gluese 015739 
33e5 
3364 
a 
3368 
3369 


3370 014270 012737 


3372 014276 023737 
3373 014304 001401 


3375 014306 104015 
3377 014310 005037 


DOS 
HPS Ab ESEORLSY ABIDES Bla OBFFBN PPE 77 


OR ;AR11 CLOCK FAILED TO RESPOND TO ADDR. 
014354 SABO? ifs 
les: 
3% MOV JARCS , SBDDAT ;/READ DEVICE REG ARCS,PUT DATA IN SBDDAT. 
001124 001126 CHP SGOLAT, SBDDAT ;DID THESE BITS SET? 
ERROR 15 ;AR11 CLOCK R/W CSR ERROR. 
014354 IMP 118 
000424 001124 1S: MOV #BITB!BIT4Y!BIT2,$GDDAT ;GET NEW PATTERN 
;% MOV $GDDAT, ARCS ;/ PUT DATA FROM SGDDAT TO DEVICE REG ARCS 
5% MOV JARCS, SBDDAT ;/READ DEVICE REG ARCS,PUT DATA IN SBODAT. 
001124 001126 CMP $GDDAT,SBDDAT ;DID THE BITS SET? 
BEQ 2s 
ERROR 15 ;AR11 CLOCK R/W CSR ERROR. 
014354 IMP 118 
001124 2s: CLR $GDDAT ;WRITE ALL ZEROS. 
; MOV SGDDAT , ARCS ;/ PUT DATA FROM SGDDAT TO DEVICE REG ARCS 
5% MOV JARCS, SBDDAT ; ZREAD DEVICE REG ARCS,PUT DATA IN SBDDAT. 
000020 001124 MOV eet, SGDDAT ‘BIT 4 ALWAYS SET 
O00i1e4% d01126 CMP GDDAt, SBDDAT 
BEQ 3g ; YES-GOOD. 
RROR 15 ;AR11 CLOCK FAILED TO ZERO CSR. 
014354 MP 118 
000003 001124 6S: MOV #B1TO!BIT1,S$GDDAT ;PUT SENABL CNTR A” AND RATE IMHZ IN CSR 
177777 O0lle6 MOV #177777, $B0DAT ;PRELOAD CNTR. 
; MOV SBDDAT , JARCB ;7 PUT DATA FROM SBODAT TO DEVICE REG ARCB 
; MOV $GDDAT, JARCS ;/ PUT DATA FROM $GDDAT TO DEVICE REG ARCS 
; MOV JARCS , SBODAT i READ DEVICE REG ARCS,PUT DATA IN SBDDAT. 
LOCK SHOULD OVERFLOW, L 
oo00222 001124 MOV #BIT7!BIT4!BIT1, Schon ;BIT O ("ENABLE CNTR A) SET 
001124 001126 CMP $GDDAT,SBDDAT ;HAPPEN OK? 
BEQ 7§ 
ERROR 15 ;CLOCK CSR PROBLEM 
001124 7$: CLR $GDDAT ;TRY CLEARING CSR 


Ee A _— oe 


DRLPA 
3379 


3409 


Be eee eee 
aera era ares 
WDONOU CWO 


8 


O14416 
014422 
014432 
014440 
014442 


012737 


104015 


ooo004 
032737 
001002 
000137 
005037 


005737 
001403 
104015 
000137 


042737 
001403 


104015 


MACY11 27(654) 
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EOS 
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DEViCE TEST-AR11 CLOCK OPTION 


009020 001124 
OO11le4% OO11lec6 


ooeco00 001562 
015132 
001124 


037532 


015132 


000200 001126 





: MOV SGDDAT, JARCS ;7 PUT DATA FROM $GDDAT TO DEVICE REG ARCS 
a MOV JARCS, SBDDAT ; ZREAD DEVICE REG ARCS,PUT DATA IN SBDDAT. 
MOV wert, S$GDDAT ‘BIT 4 ALWAYS SET 
CMP GooAT, SBODAT 
BEQ #e0 $3 
sa ERROR 15 ;CSR FAILED TO cLEAR 
; j TESTES A RRRNHA HERE TATNE ARLE DISPLAY OPTION, IF “SRI” BIT 10-1, 

; ATE *#TEST THE ARL1 DISPLAY OPTION, IF “SRI” BIT 10=1 (SET) 
HAIN THIS TE CHECKING OUT AN 1/70 DEVICE ON THE Leg-11" S 1/0 BUS. 
wa CERTAIN AMOUNT OF CONFIDENCE THAT THE M8254 CIPBM), THE 
i KHceTT ‘ IN THIS ST THE ITRATION CIRCUITRY IS 

: NOT bhecke *§ INT C Lintes 

j ATHE DI FOR TAIN OE TE IeES ON THE 

tI BUS. T DEVE obg T eit 7Q BUS, DELETE 

:*IT F - LOCATION, WE LIST CODES, AND EXPLAIN 
* TO LETE OPT TONS) . IF YoU HAVE A DEVICE ’ON THE 


aie a PAILUR TBs NOt In Teas Te T OGVI $60. SHOULD RUN THE 
“INDIVIDUAL DIAGNOSTIC THA EXERCISES THIS OPTION. 


Sa THIS TEST We MaLL CHEK OUT THE AR11 DISPLAY OPTION, 
j IF BIT 10 OF “SRI” IS 


» PPE HEEB HHHEEHE HEHEHE HEHEHE HEHEHE HEHEHE EE BREA HEBHB RH HHEHEEL 


ween SCOPE 


BIT iat ED 
20 T 


BNE HIS TEST. 
JMP 19$ 
20$: 
CLR $SGDDAT 
;% MOV $GDDAT , JARDS ;7_PUT DATA FROM SGDDAT TO DEVICE neg ARDS 
TST SAERR ;DID WE SUCCESSFULLY WRITE THE AR-11’ 
BEQ ;YES IF SAERR=0 
ERROR 1s ;FAILED TO ADDRESS AR-11. “SR1” BIT 3=1 
;SELECTED THIS TESt. AR-11 ADDRESS IS 
;IN LOC “ARADS” 
JIMP 19S 
1$: 
;% MOV @ARDS , SBDDA~ ;7READ DEVICE REG ARDS,PUT DATA IN SBODAT. 
BIC #BIT7,; $BUDAT ;CLEAR FLAG 
BEQ es ;DID CSR CLEAR? 
ERROR 1s ;CLEAR CSR FAILED (AR-11) 


SEQ 0108 


Ree — DRLPA-A 
Te0 


DRLPA.P 
at 


014444 000137 
O144S0 012737 


le 
14 104015 
16 000137 


014See 012737 


S56 
564 001403 


4S66 104015 
14570 000137 


014874 005037 


014620 042737 
001403 


104015 
014%63e 000137 
014636 012737 


014664 023737 
014672 001403 


014674 104015 
014676 000137 


014702 
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01S132 
005104 


000200 
001124 


015132 
002010 
oo0200 
001124 


015132 
001124 


000200 


015132 
001eS2 


001124 


015132 


001124 


01126 
Olieb 


001124 


001126 


001124 


001126 


13-DEC-77 
DISPLAY OPTION, 


es: 


3$: 


4S: 


FOS 


PAGE 79 
IF “SR1” BIT 10=1 (SET) 


12:58 
IMP 19S 
MOV #5104, SGDDAT 
MOV SGDDAT , JARDS 
MOV JARCS , SBDDAT 
BIC #B1T7 SBDDAT 
CMP $GDDAt , SBDDAT 
BEQ 3$ 
ERROR 15 
IMP 19S 
MOV #2010, SGDDAT 
MOV SGDDAT , JARDS 
MOV BARDS , SBDDAT 
BIC #B1T7.$BDDAT 
CMP $cODAt. $BDDAT 
BEQ 
ERROR 15 
IMP 19S 
CLR $GDDAT 
MOV $GDDAT , JARDS 
MOV JARDS , SBDDAT 
BIC #B1T7; SBDDAT 
BEQ S$ 
ERROR 15 
IMP 19s 
MOV #1252, SGDDAT 
MOV $GDDAT, JARXB 
MOV JARXB , SBDDAT 
CMP $GDDAT, SBDDAT 
BEQ 6$ 
ERROR 15 
MP 19S 
MOV SGDDAT, JARYB 
MOV JARYB, SBDDAT 


; TRY WRITING THESE BITS 

;7 PUT DATA FROM SGDDAT TO DEVICE REG ARDS 
;7READ_ DEVICE REG ARDS,PUT DATA IN SBDDAT. 
jR M_ BACK 


EAD THE 
GET RID_OF F 


LAG 
:D1D PATTERN W/R OK? 
TEST. 


; YES-NEXT 


;AR11 D/A PATTERN SO24 FAILED TO W/R PROPERLY. 


; TRY NEW PATTERN. 
;/ PUT DATA FROM SGDDAT TO DEVICE REG ARDS 
;/READ DEVICE REG ARDS,PUT DATA IN SBDDAT. 


;GET RID OF FLAG. 
;DID PATTERN XFERR OK? 


;YES-NEXT T 


SEQ 0109 


;AR-11 DISPLAY REG PATTERN 2010 FAILED TO W/R PROPERLY. 


;TRY TO CLEAR CSR. 
;7 PUT DATA FROM SGDDAT TO DEVICE REG ARDS 
;7READ DEVICE ae ARDS,PUT DATA IN SBDDAT. 


;CLEAR FLAG BIT 


;AR-11 DISPLAY REG. CSR FAILED TO CLEAR. 


;7 PUT DATA FROM SGDDAT TO DEVICE REG ARXB 
;7READ DEVICE REG ARXB,PUT DATA IN SBDDAT. 


; OK? 


;AR-11 DACX FAILED 7O sET PATTERN 12Se. 


7 PUT DATA FROM SGDDAT TO DEVICE REG ARYB 
;7READ DEVICE REG ARYB,PUT DATA IN SBDDAT. 


M3INDEC -11- DRLPA-A 
PA.P11 Teo 


ORL 


3510 


ntatataalayryrtatatatar ol 


fu 
— 


= 
WONTU CWE 


8 


014722 
014730 


014732 
014734 


014740 


023737 
001403 


104015 
000137 


012737 


023737 
001402 


104015 
0004S4 


023737 
001402 


104015 
000436 


012737 


023737 
001402 


104015 
000415 


023737 
001401 
104015 
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#TEST THE ARL1 


001126 


01S132 
oo0Ses 


001124 


001126 


000000 


001124 


001126 


001124 


001124 


001126 


001124 


001124 


001126 


001124 


GOS 
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DISPLAY OPTION, IF “SR1” BIT 10=1 (SET) 


CMP 
BEG 
ERROR 
JMP 
7$ MOV 
o% MOV 
st MOV 
CMP 
BEQ 
ERROR 
10$: 
3% MOV 
= % MOV 
CMP 
BEQ 
ERROR 
BR 
138 MOV 
;% MOV 
3% MOV 
CMP 
BEG 
ERROR 
R 
14S: 
;% MOV 
3% MOV 
CMP 
BEQ 
ERROR 
19S: 


:&TESt 21 ¥TEST T 
!%IN THIS TEST WE’LL DI 


$BDDAT,SGDVAT ;OK 
7$ 


; YES- 
1S ;AR-11 
19$ 
#0525 , SGDDAT 
SGDDAT, JARXB ;/ PUT 
JARXB, SBDDAT ; 7READ 
$GDDAT, SBDDAT 
10$ ; OK? 
1S ;AR-11 
TST21 ts 


SGDDAT,JARYB =; PUT 
BARYB,SBDDAT. =; “READ 


S$BDDAT,SGDDAT  ;0K? 
13$ : YES- 
15 ;AR-11 
TSTel 6 

#0, SGDDAT 


SGDDAT,JARXB ;/ PUT 


JARXB , SBODAT ; READ 
$GDDAT, SBDDAT 


; OK? 
1S ;AR-11 
TSTel s3 
SGDDAT, JARYB ;/ PuT 
@ARYB, SBDDAT ; 7READ 
$BDDAT,$GDDAT  ;0K? 
19$ sYES- 
1S ;AR-11 


?*#DISPLAY SCOPE VIA THE AR-11. 


DACY FAILED PATTERN 1252 


DATA FROM SGDDAT TO DEViCE REG ARXB 
DEVICE REG ARXB,PUT DATA IN S$BDDAT. 


DACX FAILED TO sET PATTERN OSeS 


DATA FROM SGDDAT TO DEVICE REG ARYB 
DEVICE REG ARYB,PUT DATA IN SBDDAT. 


DACY FAILED PATTERN OSeS 


DATA FROM SGODAT TO DEVICE REG ARXB 
DEVICE REG ARXB,PUT DATA IN SBDDAT. 


DACX FAILED TO sET PATTERN O 


DATA FROM SGDDAT TO DEVICE REG ARYB 
DEVICE REG ARYB,PUT DATA IN SBDDAT. 


DACY FAILED PATTERN O 


5 HEE AEH HE SE AE 00 A AE HE AE EH HE HE He aE AE EH HE HE EE RRR EE EEE 
HAT THE AR11 CAN DISPLAY A SQUARE, SELECTED BY BIT 10 OF SR1,SRe 
SPLAY A SQUARE ON THE 


SEG 0119 


MAINDEC -1li- ORLPA-A 


DRLPA.P11 
3541 
3542 
43 
a 
354S 015132 
3546 
sie SUI 
48 1S144 
3320 0151Se 
35 states 
35S. 15160 
3554 015164 
3585S 015172 
3557 
3889 
01Se2le 
32 Bt 16 
1S2ee4 
356 01Se26 
3564 
3565S 
35 
356 
3568 015246 
3563 0152S 
3570 Ol 
3871 0O1Se6be 
3572 
3573 
3574 
3575 
3876 015302 
3577 015306 
3578 015310 
3579 
3S 
3581 
3582 
S83 015330 
S84 015334 
3585S 
3586 
3587 
3588 
35893 
3590 015336 
3591 
3532 015340 
3533 


T21 


005237 
32737 
01762 


00237 
332737 
001762 


005337 
001365 
005337 


001365 


000004 
032737 


MACY11 27(654) 
#TEST THAT THE 


002000 
010000 


001124 
001126 
000001 


001124 
002000 


001124 


001126 


010000 


001562 
001564 


0017S4 


001124 


001126 


00156e 


09 


AR11 CAN DISPLAY A SQUARE, SELECTED SY BIT 10 OF SR1,SRe 


*#IF YOU HAVE _AN ARI1 AND SCOPE YOU MUST SELECT THIS 
fxTEST BY ee THE APPROPRIATE BITS IN “SRI” (INDICATING YOU HAVE 
:#AN AR-11) AND “SR2” (INDICATING YOU HAVE A SCOPE) 
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ies 
T 

¥81710, SRI 
BIT #B1T12,SR2 
BE TST22 


sa See 


MOV #1,MYTEMP 
1S: 
; MOV $GODAT , JARXB 
;% MOV MYTEMP , JARDS 
INC SGDDAT 
BIT fet 110, Scones 
BEG 1 
es: 
; MOV SBDDAT , JARYB 
; MOV MYTEMP, JARDS 
INC S$BDDAT 
BIT #BIT10,SBDDAT 
BEQ 2s 
38: 
3% MOV $GDDAT , JARXB 
; MOV MYTEMP, JARDS 
DEC SGDDAT 
BNE 3$ 
4S: 
; MOV $BDDAT , JARYB 
; MOV MYTEMP, JARDS 
OFS $BDDAT 


;/AR-11 SELECTED? 
:/SCOPE DISPLAY? 


;/ PUT DATA 
;/ PUT DATA 


;/ PUT DATA 
;/ PUT DATA 


;/ PUT DATA 
;/ PUT DATA 


;“ PUT DATA 
;7 PUT DATA 


FROM $SGDDAT 
FROM MYTEMP 


FROM $BDDAT 
FROM MYTEMP 


FROM SGDDAT 
FROM MYTEMP 


FROM S8DDAT 
FROM MYTEMP 


TO 
TO 


TO 
TO 


TO 
TO 


TO 
TO 


ePTrTttiTititiiiiititittititttiiiitiitititittiriririi iirc esc 
: SCOPE 


O<VICE 
DEVICE 


DEVICE 
DEVICE 


DEVICE 
DEViCE 


DEVICE 
DEVICE 


eee det thet Aa ot 


‘kTe 22 1/0 DEVICE TEST LPS-11 A/D OPTION 
Meet ee AEUORe enue evasdustaautasanserssaneeuseauesuuancuanasas 


+$T22: SCOPE 
BIT #B1T12,SR1 


pp-tcre FOR TEST? 


REG 
REG 


REG 
REG 


REG 
REG 


REG 
REG 


ARXB 
AROS 


ARYB 
ARDS 


ARXB 
ARDS 


ARYB 
ARDS 


SEQ O111 


MAINDEC 

ORLPA.P11 
3595 015346 
3596 015350 
3897 015354 
3898 015354 
359393 
3600 
3601 
3602 
3603 
3604 
3605 
3606 
3607 
3608 
3603 015370 
3610 015374 
3611 015376 
3612 015400 
3613 
3614 015404 
3615 
3616 
3617 015414 
3618 015422 
3619 015426 
3620 015432 
36e1 
36ee 015434 
36e3 015436 
3624 015440 
3625 
3626 
3627 
3628 
3629 
3630 O15466 
3631 015474 
3632 015502 
3633 
3634 015504 
3635 015506 
3636 
3637 015510 
3638 
3639 
3640 
3641 
3642 
3643 015536 
3644 015544 
364S 0155S2 
3646 
3647 015554 
3648 O1S5SS6 


-11- ORLPA-A 
1 Tee 


001002 
000137 


005037 


042737 
023737 
001402 


104016 
OO0S46 


012737 


042737 
023737 
001402 


104016 
000See 


MACY11 27(6S4) 


1/0 DEViCE TEST 


016014 
001126 


037532 


016014 
100200 
001124 
001126 


025100 


100200 
001124 


012404 


001126 


001124 


001124 


13-DEC-77 
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LPS-11 A/D OPTION 


10S: 


2% 


11S: 


1S: 


es: 


BNE 
JMP 


CLR 
MOV 


10$ 
75 
SBDDAT 
SEDDAT, JLPADSR ;/ PUT DATA FROM SBDDAT TO DEVICE REG LPADSR 
!OK-WHAT WE JUST DID IS ASKED THE 
SLAVE MICRO-CODE TO WRITE THE CONTENTS 
: OF B/D 7S CSR TO ZEROES. 
'IF THE A/D FAILS TO reSPOND TO ITS 
4 SS-THE SLAVE WILL SEND US AN 
ERROR CODE THAT CAUSES US TO SET SAERR=1 
IN THE SUPPORT ROUTINES. 
SAERR ;DEVICE PRESENT? 
11S * YES-CONT INUE 
16 !a7D FAILED TO RESPOND 
7g TO ADDR. 


@LPADSR,SBDDAT ;/READ DEVICE REG LPADSR,PUT DATA IN SBDDAT. 


#81T15!B1T7,SBDDAT ;CLEAR OUT FLAGS 
SGODAT 
ed ;I1S CSR ZERO? 


;FAILED TO ZERO A/D CSR 


16 
TSTe3 FT 
#B1T13!BIT11!B1T9!BIT6,SGDDAT ;NOW TRY A NEW BIT PATTERN 


SGDDAT,@LPADSR ;/7 PUT DATA FROM SGDDAT TO DEVICE REG LPADSR 
@LPADSR,SBODAT ;/READ DEVICE REG LPADSR,PUT DATA IN SBDDAT. 


#81T15!B8117, $BDDAT ; IGNORE FLAGS 
SGDDAT, SBDDAT ;BIt SET OK? 


16 
TST23 43 


;FAILED TO wRITE A/D CSR CORRECTLY 


#BITi2!BIT1O!BITS!BIT2,SGDDAT ;NOW TRY A NEW BIT PATTERN. 


SGDDAT,@LPADSR ;/7 PUT DATA FROM S$GDDAT TO DEVICE REG LPADSR 
@JLPADSR,SBODAT ;/READ DEVICE REG LPADSR,PUT DATA IN SBDDAT. 


#BIT1S!B1T7,$BDDAT ; IGNORE FLAGS 
SGDDAT, S8DDAT ;BITS SET Ok? 


6 ;FAILED TO WRITE A/D CSR CORRECTLY 


1 
TSTe3 33 


SEQ 0112 


MAINDEC -1l1l- wie 
DRLPA.P11 T2e 


01ss60 005037 


604 042737 
612 005737 
001402 


104016 
000S00 


012737 


O01S6S2 012737 


015670 
015676 


015700 
015702 
015704 


023737 
001402 


104016 
0004S0 
012737 


015732 
015740 
015746 
015750 
015752 


012737 
023737 
001401 
104016 
005037 


000200 
001126 


ooo001 


000200 


001124 


000001 


100200 
001124 


001124 


001126 


001124 


001124 


001126 


001124 


001124 
001126 
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LPS-11 A/D OPTION 


3$: 


S$: 


CLR 


$SGDDAT 
SGDDAT , JLPAOSR 
@JLPADSR , SBDDAT 


#8177, SBDDAT 
$BD0At 


16 
TST23 

@LPADBR, MYTEMP 
#81T0, SGDDAT 
S$GDDAT , ALPADSR 
#81T7, $GDDAT 


@LPADSR , SBDDAT 
$SGDDAT , SBDDAT 
S$ 


16 
TSTe3 
#BITO, SGDDAT 


SGDDAT , JLPADSR 


@LPADSR, SBDDAT 


;NOW CLEAR ALL BITS SET 

7 PUT DATA FROM SGDDAT TO DEVICE REG LPADSR 
5 /RERD DEVICE REG LPADSR,PUT DATA IN SBDDAT. 
: IGNORE DONE FLAG. 
:CSR CLEAR? 


;A7D CSR FAILED TO CLEAR. 


1eere DEVICE REG LPADBR, PUT DATA IN MYTEMP. 
NOW WE’LL SET THE A/D START B 


TA en Erne FROM SGDDAT TO DEVICE REG LPADSR 
CSR BACK EXPECT 

i START BIT TO CLEAR, DONe TO s€ET. 

;7READ DEVICE REG LPADSR,PUT DATA IN SBDDAT. 

;START OK? 


AD AFTER A/D START 


;CSR B 
IT O SHOULD CLEAR ONLY A/D DONE SET. 


sc 
38 


;OK-NOW WE’RE GONNA START ANOTHER 
:A/D CONVERSION WITHOUT “ONE. THIS 


; THE RESULTS OF THE LAST ONE. 

;SHOULD CAUSE THE ERROR F a 

;AS WELL AS THE DONE FLAG TO SET. 

7 PUT DATA FROM SGDDAT TO DEVICE REG LPADSR 


Ages yA DEVICE REG LPADSR,PUT DATA IN SBDDAT. 


#BIT15!81T7,SGDDAT ;5/B 


SGDDAT , SBDDAT 
6% 

16 

SGODAT 
SGDDAT , JLPADSR 
@LPADSR , SBDDAT 


;I1S 1S AND 7 SET? 


;ERROR A/D BIT 1S AND 7 SHOULD BE 
;MAKE SURE ERROR FLAG CLEARS 


;7 PUT DATA FROM SGDDAT TO DEVICE REG LPADSR 


; “READ DEVICE REG LPADSR,PUT DATA IN SBDDAT. 


SE@ 0113 


MAINDEC -11- DRLPA-A 
Pill T2 


DRLPA. 


KOS 
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ooocecde 001126 BIC #BIT7,SBDDAT ; IGNORE DONe FLAG. 
001126 az $BDDAT ;IS CSR CLEAR? 
ERROR 16 ;A7D CSR FAILED TO CLEAR. 
7$: 
;* MOV @LPADBR,MYTEMP ;/READ DEVICE REG LPADBR,PUT DATA IN MYTEMP. 


SEG O114 


DRLPA. PR PLi 


-ll1- ORLPA-A 
Tee 


016024 000004 
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3760 016026 032737 O20000 0015&e 


LOS 
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ists A/D SBT ION 


j TESTES RRMRRRER DURE EVICE TECTLPSACLOCK OPTION. 
tkTE 1/0 DEVICE TEST-LPS-CLOCK OPTION 


PxIN THIS TEST WE og Be Se KTS OUT AN 170 peviee. ons Ma ye SI 
; C OF CONFIDENCE THA PBM 


SE 


ee 

rot 

> 

°o 

_ 

nn 

Te 

a° 

ond _ 

Mace 
Ha 


Te Op 


#HOW T 
13170, 0U8 THAT SSCIRE SOR Teoh /70 


t SINDIVIDUAL DIAGNOSTIC THAT EXERCISES THIS OPTION. 


Ua, HSSARST AEG BURGER EN ERE 1 


1S A DEFAUL 
PLEASE A Sb oeK TH ane ONLY YA A BRIEF T F TEST OF THE LPS-11 CLOCK, 
TO SEE THAT IT BuahLy Y WORKS. FOR TESTING, YOU 
MUST RUN THE LPS-11 CLOCK DIAGNOSTIC. COMPLETE 


(NOTE: IF THE LPS-11 CLOCK ON YOU I7 


2. CLOCK CSR BITS 14,9,6,3, AND 1 SET 


Oe eee ee ee ee ee ee ee es ee eres es 


3. CLOCK CSR BITS 13,8 AND 2 SET 


£ 


CLOCK CSR ZEROS. 
START CLOCK A MODE O, RATE 1MHZ, 


CHECK “ENABLE CNTR A” CLEARS, 
“OVERFLOW FLAG” SETS 


wo ORK OOK KOK WOR RCCCICC C C  RC ae 


uw 


6. CLOCK A CSR ZEROS 


7 s+ mp => maaan cs anna an amen tan icicoireeeia antares 
T23: SCOPE 


BIT #BIT13,SR1 ;IS THIS DEVICE SELECTED FOR TEST? 


SEQ 0115 


70 BUS. 


“Avisos fh ERreRnaurt Lee ie © CIRCUITRY IS 
FAULT alt ME oe fees “EXPLAIN 


TEStS: 1. MAKE SURE LPS-11 CLOCK RESPONDS TO ADDRESS 
Q BUS USES A NON 
STANDARD ADDRESS: MODIFY “LPADSR” WITH THE CORR 
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DRLPA.Pil Te3 1/0 DEVICE TESt-LPS-CLOCK OPTION 
7 
354 016034 001002 BNE 10% 
3763 016036 000137 016346 JMP 11% 
3764 016042 10S: 


;NOTE: DEFAULT=YES. 


SEQ 0116 


09 
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DRLPA. T23 1/0 DEVICE TEST-LPS-CLOCK OPTION SEQ 0117 — 
3766 016042 012737 041110 001124 MOV #BIT14!BITS9!BIT6!BIT3,$GDDAT ; TEST THESE BITS 
3768 

769 3% MOV $GDDAT,ILPCKSR ;7/ PUT DATA FROM SGDDAT TO DEVICE REG LPCKSR 

3771 016060 005737 037532 TST SAERR sD1D CLOCK RESPOND 

3772 016064 001403 BEQ 12$ TO ADDR? $A RERR= 0? 

3773 tIF YES-NEXT TEST. 

3774 O16066 104016 ERROR 16 :CLOCK FAILED TO RESPOND TO ADDR. 

3775 016070 000137 016346 IMP 11S 

3776 016074 12S: 

3535 

3778 5% MOV @LPCKSR,SBDDAT ;/READ DEViCE REG LPCKSR,PUT DATA IN SBDDAT. 

3781 016104 023737 001124 001126 CMP $GDDAT,SBDDAT ;DID THESE BITS SET? 

378¢ 016112 001403 BEQ 1$ 

3784 016114 104016 ERROR 16 ;CLOCK R/W CSR ERROR. 

3768 016116 000137 016346 IMP 11$ 

3787 016122 012737 O20404 001124 1S: MOV #BIT13!BIT8!BIT2,$GDDAT ;GET NEW PATTERN 

3789 3% MOV $GDDAT,JLPCKSR ;/ PUT DATA FROM SGDDAT TO DEVICE REG LPCKSR 

3731 5% MOV @LPCKSR,SBDDAT ;/READ DEVICE REG LPCKSR,PUT DATA IN SBDDAT. 

3793 016150 023737 001124 001126 CMP $GDDAT,SBDDAT  ;DID THE BITS SET? 

3734 016156 001403 BEQ 2s 

3796 O16160 104016 ERROR 16 ;CLOCK R/W CSR ERROR. 

3737 016162 000137 0o16346 IMP 118 

3233 016166 005037 001124 2s: CLR $GDDAT ;WRITE ALL ZEROS. 

3801 3% MOV SGDDAT,@LPCKSR ;/ PUT DATA FROM SGDDAT TO DEVICE REG LPCKSR 

3803 ;% MOV QLPCKSR,SBDDAT ;/READ DEVICE REG LPCKSR,PUT DATA IN SBODAT. 

3804 O16212 005737 001126 TST $BDDAT *DID CSR CLEAR? 

3805 016216 001403 BEQ 3$ ? YES-GOOD. 

3807 016220 104016 ERROR 16 ;CLOCK FAILED TO ZERO CSR. 

3808 Ol6222 000137 016346 IMP 118 

3810 016226 012737 O00003 001124 3S: MOV #BITO!BIT1 scpoAT -PUT “ENABL CNTR A” AND RATE IMHZ IN CSR 

3811 016234 012737 177777 OOlle6 MOV #177777,$BDDAT ;PRELOAD CNTR. 

3813 5% MOV $BDDAT,@LPCKBR ;/ PUT DATA FROM SBDDAT TO DEVICE REG LPCKBR 

3815 3: MOV SGDDAT,@LPCKSR ;/ PUT DATA FROM SGDDAT TO DEVICE REG LPCKSR 

3817 : ;% MOV JLPCKSR, SBDDAT ; READ DEVICE REG LPCKSR,PUT DATA IN SBDDAT. 

3818 CLOCK SHOULD OVERFLOW, CLEAR 

3819 016272 012737 oO0202 001124 MOV #BIT7!BIT1, scppat ;BIT 0 ("ENABLE CNTR’A) SET 
| 
| 
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3820 

3821 016300 
3822 016306 
3824 016310 


016312 


3873 016410 


023737 
001401 


104016 
00S037 


008737 
001401 


104016 


000137 
005037 
005737 
001403 
104016 


000137 
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1/0 DEVICE TEST-LPS-CLOCK OPTION 


001124 001126 


001124 


001126 


100000 001562 
017044 
001124 


037532 


017044 


;BIT 7 
CMP $GODDAT,SBDDAT ;HAPPEN OK? 
BEQ 7$ 
ERROR 16 ;CLOCK CSR PROBLEM 
7$: CLR SGDDCAT ; TRY CLEARING CSR 
;* MOV SGDDAT,@LPCKSR ;/7 PUT DATA FROM SGDDAT TO DEVICE REG LPCKSR 
;* MOV @LPCKSR,SBODAT ;/READ ots a. LPCKSR,PUT DATA IN SBDDAT. 
TST seoon! ;DID CSR CLEAR 
BEQ TSTe4 +5 
1. ERROR 16 ;CSR FAILED TO cLEAR 
H j TRAEM SA MRRRNRR EERE MENS EES TO Ir “SRI” BIT isei(SeT) 
j ATE va #TEST THE LPS 170, IF “SR1” BIT 15=1(SET) 
ey THIS TEST WE ARE CHECKING OUT AN 170 Ws A ON THE at is I/O BUS. 
;*WE HAVE A CERTAIN AMOUNT OF CONFI NCE THA ys 8 CIPBM), THE 
; #KMC-11 AND mes WORK. IN THIS T a Tie ARBITRATION CIRCUITRY IS 
;#NOT CHECK HE DEVICE’S INTERRRUPT CAPAB RAT TES. 
;*#THE DI ue I F TAIN DEF VICES ON THE 
;#170 BUS. HE DEV onarie NOT ON 4/2 BUS, DELETE 
;#IT FROM “SR1” WE pee’ AND leases 


-% " 

j xIN ee TEST WE WILL CHECK OUT LPS-I/0 IF BIT 15 OF nisi 

;*#(SET). ALSO, DATA LOOP BACK (OUTPUT DATA BACK TO INPUT) WILL BE CHECKED 
jxIF "oRe" BIT 1S =1 (SET). FOR THIS, YOU MUST HAVE INSTALLED A LOOP-BACK 


: Te ae 2 2a eer cinema Sop ne cee nen aC ta ilsieRs APNE Ree tS 


+éT24 
#81T15,SR1 
B 10$ ; 1-TDRT- 
ie IMP 11$ 
: CLR SGDDAT ;/SET TO XFERR ZEROS. 
5% MOV SGDDAT,@LPIOSR ;/ PUT DATA FROM SGDDAT TO DEVICE REG LPIOSR 
TST SAERR *=1 IF DEVICE NOT PRESEN NT, 
BEQ 1$ :IF O, PRESENT, (CON’T) 
ERROR 16 ;DR11K_#’DRN’ DID NOT RESPOND WHEN 
;ADORESSED. “SRI” BIT *DORB’ SELECTED 
‘THIS OPTION. ADDRESS “DRCR” *ORN 
‘CONTAINS ITS ADDRESS 
IMP 118 


Prin 


SEQ 0118 


EEE ee ee 
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016414 


016460 


biesis 
biesce 


016522 


016870 


giseis 
biges2 


016634 


012737 


023737 
001402 
104016 
000851 
005037 


005737 
001402 


104016 
000832 


032737 
001526 


012737 


mere 
a5 


104016 
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001126 


0i7044 


040100 


001124 


001124 


001126 


100000 


O0S2SeS 


000200 
001126 


001124 


001126 


001564 


001124 
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*#TEST THE LPS 1/0, IF “SRI” BIT 15=1(SET) 


1$: 
+ % 


3S: 


4S: 


SF ARFT» SEOOAT 
$B8DDA 

2 

16 

118 


@LPIOOR, SGDDAT 
@LPIOIR, SGDDAT 


/READ DEVICE REG LPIOSR,PUT DATA IN SBDDAT. 
of5 RR adh ; 
;LPS-I/0 CSR FAILED TO CLEAR. 


;7READ DEVICE REG LPIOOR,PUT DATA IN SGDDAT. 
;7READ DEVICE REG LPIOIR,PUT DATA IN SGDDAT. 


#BIT6!BIT14,SGODAT ;LOAD WRITEABLE BITS. 


SGDDAT, ILPIOSR 

GLPIOSR $BDDAT 
T, $BDDAT 

16 

TST2s 

$GDDAT 

SGDDAT, ALPIOSR 

@LPIOSR, SBDDAT 

$BDDAT 

16 

TST2s 

#BIT1S,SRe 

TST2s 


#0S2Se5 , SGDDAT 
SGODAT , ILPIOOR 
@LPIOSR, SBDDAT 


#81T7, SGDDAT 
sgoont, $GDDAT 


16 


;7 PUT DATA FROM SGDDAT TO DEVICE REG LPIOSR 
/READ DEVIC — LPIOSR,PUT DATA IN SBDDAT. 
:DID BITS SET? 


;LPS-1/0 CSR BIT(S) FAILED. 
+3 

; TRY CLEARING CSR. 

;/ PUT DATA FROM SGDDAT TO DEViCE REG LPIOSR 
;/READ DEVICE REG LPIOSR,PUT DATA IN SBDDAT. 
:DID C CLEAR? 

 YES-NEXT TEST. 

;LPS-1/0 CSR FAILED TO CLEAR. 

+3 

;DOES THIS 1/0 HAVE A_LOOP BACK 

!CABLE CONNECTEL TO IT? 


itr SR2 BIT1S=1 THEN LOOP BACK. 
;SET FIRST PATTERN 
;7 PUT DATA FROM SGDDAT TO DEVICE REG LPIOOR 


/READ DEVICE REG LPIOSR, PUT DATA IN SBDDAT. 
EXPECT FLAGS TO SET 
' Ore CORT. 


sLPS- I170_CSR_FLAG(S) FAILED TO SET 
WHEN DATA XFERRED. IS THE OUTPUT 
i REALLY CALLED BACK TO tHE INPUT? 


SEQ 0119 
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016636 
016640 


016752 
016760 


Te4 
ooosde 
012737 


Bi 452 


ABoaeE 


00$737 
100402 
104016 
0004S4 


012737 


023737 
001402 


bba42? 
005037 


005737 
001402 


104016 
000404 
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IF “SR1” BIT 1S5=1(SET) 


MACY11 27(6S4) 
#TESt THE LPS I70, 


BR TST2s $3 
oseseS 001124 SS: MOV #0S2S25,SGDDAT ;PATTERN THAT SHOULD HAVE XFERRED. 
3% MO R T ;/READ ICE_RE OIR,PUT DATA IN SBDDAT. 
001126 001124 che SbbSAP SSBCRT OBGR oPRY LSE 78 BRE LOEB» 
ERROR ig ;LPS-11 170 DATA XFERR ERROR. 
Tes +; 
6S: 
;% M PIOSR,SBDDAT ;/READ DEVICE LPIOSR,PUT DATA IN SBCDAT. 
001126 ney ebbar ’ This bof BaF Frag” bees 
BMI 7$ :SHOULD HAVE. 
ERROR 16 ;LPS-11 I70 “OUTPUT FLAG” FAILED TO SET. 
BR TSTes as 
73: 
5% MOV $GDDAT,@LPIOOR ;/ PUT DATA FROM SGDDAT TO DEVICE REG LPIOOR 
125252 001124 MOV #125252,$GDDAT ;NEW PATTERN 
; MOV SGDDAT,@ILPIOOS ;/ PUT DATA FROM SGDDAT TO DEVICE REG LPIOOR 
; MOV QLPIOIR,SBDDAT ;/READ DEViCE REG LPIOIR,PUT DATA IN SBDDAT. 
001126 001124 CMP $BDDAT,$GDDAT #;PATTERN XFERR OK? 
BEQ 8s 
ERROR +8 ;LPS 170 DATA XFERR ERROR 
R Tes 33 
BS: 
5% MOV $GDDAT, DLPIOIR ;7_PUT DATA_FROM $GDDAT TO DEVICE REG LPIOIR 
001124 CLR SGDDAT :NOW XFERR ZERO PATTERN. 
; MOV SGDDAT,ILPIOOR ;/7 PUT DATA FROM SGDDAT TO DEVICE REG LPIOOR 
; MOV QLPIOIR,SBDDAT ;/READ DEVICE REG LPIOIR,PUT DATA IN SBDDAT. 
001126 tat $BDDAT :DID ZERO PATTERN GET XFERRED? 
ERROR 16 ;LPS 1/0 DATA XFERR ERROR 
R TSTes $3 
9S: 
i*. MOV SGDDAT,@LPIOSR ;/ PUT DATA FROM SGDDAT TO DEVICE REG LPIOSR 
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*#TESt THE LPS D/A OPTION, IF “SRI” BIT 14=1 (SET) 


040000 
017622 
001124 


037532 


017622 


000200 


017622 


005124 


000200 
001124 


001562 


001126 


001124 
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; eee eee eee T TION IF mSRL™ BIT Ital Caey? 
; ATE #TESt THE LPS D/A OPTION, IF “SRI” BIT 14=1 (SET) 


SIN THIS TEST WE ARE RMGUNT OF CON OUT _AN 170 DEVICE ON THE LPA-11’S 170 BUS. 
;*WE HA CERTA 


: VE A CERTAIN AMOUN ONF IDENCE THAT THE eres CIPBM), THE 
?%KMC-11 AND THE DMC-11 WORK. Test Apate ARBITRATION CIRCUITRY IS 
: CHECK, NOR THE vicers INTE ERRRUPT CAPABILITIES é 
:#THE DIAGNOSTIC IS uP FOR RETAIN DE DEVICES 
**1/0 BUS. IF THE DEF DEVICE IS NOT ON THE 1/0 8US, ETE 
:*xIT FROM “SRI” (NO E: AT LOCATION, WE LIST CODES; AND EXPLAIN 
TO DELETE OPTIONS) . IF YOU HAVE A DEVICE’ ON 

;#170 BUS THAT IS NOT A DEFAULT DEVICE, AD IT TO “SRI™ 

:#IF A FAILURE OCC URS IN THIS TEST, YOU SHOULD RUN THE 

j INDIVIDUAL DIAGNOSTIC THAT EXERCISES THIS OPTION. 


RIN THIS TESt WE WILL CHECK OUT THE LPS D/A OPTION. 
#IF BIT 14 OF “SR1” IS SET. 


arte C 
BIT #81T14,SR1 
BNE 20$ 
IMP 19$ 
208: 
CLR SGDDAT 
;% MOV $GDDAT, ILPDASR 
TST SAERR 
BEQ 
ERROR 16 
IMP 19S 
1$: 
5% MOV aL POASR $BDDAT 
BIC #6177, SBDDAT 
BEQ 25 
ERROR 14 
IMP 19S 
2s MOV #5124, SGDDAT 
; MOV SGDDAT , ALPDASR 
; MOV @LPDASR, SBDDAT 


BIC #B1T7,SB0DAT 
scoont, $BDDAT 


ie 
. Rag ta aa bi IC ace aC tat tbat 


S D/A SELECTED? 


S Lu 
F =0, NO, SKIP THIS TEST. 


31 
:1 


UT DATA FROM SGDDAT TO DEVICE REG LPDASR 
eee sa ULL WRITE THE LPS D/A? 


I 
LED TO_ADORESS LPS D/A. “SRI” BIT 14=1 
SELECTED THIS TEST. LPS D/A ADDRESS IS 
;IN LOC “LPDASR” 


;/READ DEVICE REG LPDASR,PUT DATA IN SBDDAT. 
:DID CSR CLEAR? 
;CLEAR CSR FAILED (LPS-D/A) 


; TRY WRITING THESE BITS 

;7 PUT DATA FROM SGDDAT TO DEVICE REG LPDASR 
;7READ_DEVICE REG LPDASR,PUT DATA IN SBDDAT. 
:R THEM BACK 


;GET RID OF FLAG 
;DID PATTERN 


SEQ Ole21 
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ORLPA.P11 
4037 017204 
017206 


33 
4040 017212 


404 
404 
4O44 
4O4S 017240 
4 017246 
4047 017254 
404 
4O4S 917256 
4OSO 017260 
4051 
4OS2 017264 
4053 
4os4 
4055 
056 
4057 017310 
4058 017316 
4059 
4060 017320 
4061 017322 
4062 
4063 017326 
4Ob4 
4O6S 
4O66 
4067 
4068 017354 
4069 017362 
4070 
4071 017364 
4072 017366 
4073 


oo tf 


Tes 

104016 
000137 
012737 


042737 
023737 
001403 


104016 
000137 


005037 


042737 
001403 


104016 
000137 


012737 


023737 
001403 


104016 
000137 


023737 
001403 


104016 
000137 


012737 


MACY11_27(654) 


017622 
002012 001124 


0 


000200 00112 
O0ile4 OOlle 


6 
6 


017622 
001124 


ooce00 001126 


017622 
ooSesSe 001124 


001124 001126 


017622 


001126 001124 


017622 


00eSesS 001124 


13-DEC-77 
*#TEST THE LPS D/A OPTION, 


4S: 


7$: 


12:58 PAGE 92 
IF “SRI” BIT i4=1 (SET) 
ERROR 16 
IMP 19$ 
MOV #2012, $GDDAT 
MOV SGDLAT, JILPDASR 
MOV aL PORSR $BODAT 
BIC SBDDAT 
CMP Hite boat® SRDDAT 
BEQ 4S 
ERROR 16 
IMP 19S 
CLR SGDDAT 
MOV SGDDAT, JLPDASR 
MOV @LPDASR, $BDDAT 
BIC #8117, SBDDAT 
BEQ S$ 
ERROR 16 
IMP 19S 
MOV #5252, SGDDAT 
MOV $GDDAT , ILPDAXR 
MOV JLPDAXR , SBDDAT 
CMP $GDDAT , $BDDAT 
BEQ 6S 
ERROR 16 
MP 19S 
MOV SGDDAT, JLPDAYR 
MOV OLPDAYR $BDDAT 
CMP $BDDAT , $GDDAT 
BEQ 
ERROR 16 
IMP 19S 
MOV #2525, SGDDAT 
MOV $GDDAT , ILPDAXR 


F10 


; TRY NEW PATTERN. 

;/ PUT DATA FROM SGDDAT TO DEVICE REG LPDASR 
;CREAD DEVICE REG LPDASR,PUT DATA IN SBODAT. 

BID PATTERN Xr KERR OK? 


; TRY TO CLEAR CSR. 
;/ PUT DATA FROM SGDDAT TO DEVICE REG LPDASR 
: CREAD DEVICE REG LPDASR,PUT DATA IN SBDOAT. 


;LPS D/A PATTERN S124 FAILED TO W/R PROPERLY. 


LPS D/A PATTERN 2012 FAILED TO W/R PROPERLY. 


;LPS D/A CSR FAILED TO CLEAR. 


/ PUT DATA FROM SGDDAT TO DEVICE REG LPDAXR 
;7READ DEVICE REG LPDAXR,PUT DATA IN SBDDAT. 


;07A DACX FAILED TO SET PATTERN SeSe. 


;7 PUT DATA FROM SGDDAT TO DEVICE REG LPDAYR 
;7READ DEVICE REG LPDAYR,PUT DATA IN SBDDAT. 


;DACY FAILED PATTERN SeS2 


/ PUT DATA FROM SGDDAT TO DEVICE REG LPDAXR 


SEG Olee 


G10 
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DRLPA.P11 Tes *TEST THE LPS D/A OPTION, IF “SRI” BIT 14=1 (SET) SEQ 0123 
4030 ;% MOV QLPDAXR,SBDDAT ;/READ DEVICE REG LPMAXR,PUT DATA IN SBDDAT. 
4091 017456 023737 001124 001126 CMP $GDDAT , $B80DAT 
403 017464 001402 BEQ 10$ ; 0K? 
4094 017466 104016 ERROR 16 ;D/A DACY FAILED TO SET PATTER 2525 
4038 017470 oo04s4 BR TST26 +5 
W032 017472 10% 
4088 5% MOV SGDDAT,@ILPDAYR ;/ PUT DATA FROM SGDDAT TO DEVICE REG LPDAYR 
4101 ; MOV JLPOAYR, SBDDAT ; (READ DEVICE REG LPDAYR,PUT DATA IN SBDDAT. 
4102 017512 023737 OO01126 001124 CMP SBDOAT, $GDDAT 
4103 017520 00140e BEQ 11$ :oES- 
aiBe 017522 104016 ERROR 16 ;D/A DACY FAILED PATTERN 2525 
4106 017524 000436 BR 18126 $5 
4108 017526 118 
4110 017526 012737 OO00000 001124 13%: MOV #0, SGDDAT 
Wiig ;% MOV SGDDAT,@LPDAXR ;/ PUT DATA FROM SGDDAT TO DEVICE REG LPDAXR 
4114 :* MOV @LPDAXR,SBDDAT ;/READ DEVICE REG LPDAXR,PUT DATA IN SBDDAT. 
4115 017554 023737 001124 001126 CMP $GDDAT , $BDDAT 
4116 017562 001402 BEQ 14S ; OK? 
4118 017564 104016 ERROR 16 ;D/A DACX FAILED TO SET PATTERN 0 
4113 017566 000415 BR TST26 $5 
diel 017570 14S: 
188 5% MOV SGDDAT,@LPDAYR ;/ PUT DATA FROM SGDDAT TO DEVICE REG LPDAYR 
4125 :% MOV @LPDAYR,$BDDAT ;/READ DEVICE REG LPDAYR,PUT DATA IN SBDDAT. 
4126 017610 023737 001126 001124 CMP SBODAT, $GDDAT  :0K? 
Hie? 17616 O01401 BEQ TST26 35 
41239 017620 104016 ERROR 16 ;D/A DACY FAILED PATTERN O 
4130 017622 19S 
4131 
4132 017622 15S: 
us 
4135 + RRR GREGG RRR RRR RRR KARR R RRR RARRRRARARARRRAKKALHA ALLAH KLEE 
4136 TEST 26 *TEST THAT THE LPS D/A CAN DISPLAY A SQUARE 
4137 ial THIS TEST WE’LL DISPLAY a SQUARE ON 
4138 *OISPLAY wacore., Vig. THE ates ocA 
4139 € YOU MUST SELECT THIS 
4140 pie “BY, “SETTING 7 OnPP ROPRE cor ITS IN “SRI” (INDICATING YOU HAVE 
4141 :#AN LP “GRO” (INDICATING YOU HAVE A SCOPE) 
4142 POETS eer eer TT Ee Te TTT ETS SETTETET TESTES TESSTOSS TOTES TTT TTT ST Ty 
4143 017622 oD00004 +4726: SCOPE 
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ORLPA.P11 T26 *TEST THAT THE LPS D/A CAN DISPLAY A SQUARE SEQ 0124 
4144 
3 7 BRT 
qi4 176 032737 040000 001562 BIT sBIT14, RI 7 D/A SELECTED? 
41g 017 34 936737 040000 001564 BIT a81T;4, , SR2 ; “SCOPE DISPLAY? 
4150 Li) 
4151 017644 005037 001124 CLR $GDDAT 
4152 017650 005037 001126 CLR $BDDAT 
4153 017654 O12737 O00001 001754 MOV #1, MYTEMP 
4154 017662 1S: 
4156 ;% MOV SGDDAT,@LPDAXR ;/ PUT DATA FROM SGDDAT TO DEVICE REG LPDAXR 
4158 : ~ , ; Hoy By MP, @LPDASR ;/ PUT DATA FROM MYTEMP TO DEVICE REG LPDASR 
4160 ree 38737 atari 001124 BIT #B1T12, SGDDAT 
4161 017714 001762 BEQ 1$ 
Wibe 017716 2s: 
4164 5% MOV SBDDAT,SLPDAYR ;/ PUT DATA FROM SBDDAT TO DEVICE REG LPDAYR 
4166 sua iameeient nin ie ;% Nov MY TEMP, JLPDASR ;/ PUT DATA FROM MYTEMP TO DEVICE REG LPDASR 
4168 Oto oas 032737 nytt 001126 BIT #81112, SBDDAT 
4169 017750 001762 BEQ 2s 
4170 017752 3$ 
4172 :% MOV SGDDAT,LPDAXR ;/ PUT DATA FROM SGDDAT TO DEVICE REG LPDAXR 
ui78 aii anianat” wniaain ;% Mov MY TEMP, ILPOASR ;/ PUT DATA FROM MYTEMP TO DEViCE REG LPDASR 
4176 017776 001365 BNE 
4127 020000 ug 
4128 :* MOV SBDDAT,ILPDAYR ;/ PUT DATA FROM SBDDAT TO DEVICE REG LPDAYR 
4181 = heat aaaae ;% Mov MY TEMP, ILPDASR ;/ PUT DATA FROM MYTEMP TO DEVICE REG LPDASR 
di85 Ss0084 Sorses BR 
4184 
4185 
die? 
4188 | PESSUALURSAEESO SR RRRER SERRE SES SO TERRES han Ay hace Gee 
4189 i ATE Cr et 7 utleet oTeaT THE RALIK # CAN DISPLAY A SQUARE, SELECTED BIT 3 IN SR1,SR2 
419 :¥DISPLAY SC VIA THE AA-1 
dies iste YOU HAVE BN Bail AND. SCOPE YOU MUST SELECT THIS 
sig UP Bes a aade MT STE EL tal ily (USBEGATING vou wave 
sia 020026 oo0004 See aaa taal 
4197 020030 012737 OO00001 001160 MOV #1,STIMES ;;DO 1 ITERATION 


T10 
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DRLPA.P11 127 *TEST THAT THE AA11K # CAN DISPLAY A SQUARE, SELECTED BIT 3 IN SR1,SR2 SEQ 0125 
41 
41 ; -DAAT- 
4200 020036 032737 000010 001562 BIT #8173, SP :/AA-11K SELECTED? 
4202 pepo4e 093753 000010 001564 BIT #B173,SRe :7SCOPE DISPLAY? 
we03 O200S4 001471 BEQ TST30 $3 
420S 020056 005037 001124 CLR SGDDAT 
4206 O20062 005037 001126 CLR $BDDAT 
4207 O20066 012737 O00001 001754 MOV #1, MYTEMP 
#208 020074 1S: 
4210 ;% MOV SGDDAT , IDACO ;/ PUT DATA FROM SGDDAT TO DEVICE REG DACO 
W212 CR ASIA ;% Mov MYTEMP,@AACSR ;7 PUT DATA FROM MYTEMP TO DEVICE REG AACSR 
4214 Q20120 032737 010000 001124 BIT #BIT12, SGDDAT 
4215 020126 001762 BEQ 1S 
ueié 020130 2s: 
ugig ; MOV $BDDAT, IDAC! ;7 PUT DATA FROM SBDDAT TO DEVICE REG DAC 
4ee0 eae Silene” bls unk ;% Mov MYTEMP, GAACSR ;/ PUT DATA FROM MYTEMP TO DEViCE REG AACSR 
4222 020154 032737 O10000 o01126 BIT #81T12, SBDDAT 
4223 Oe0162 001762 BEQ 2g 
ices 020164 3$: 
Weee 5% MOV SGDDAT, IDACO ;/ PUT DATA FROM SGDDAT TO DEViCE REG DACO 
wees ensin’ ieee daa ;* Mov MYTEMP, GAACSR ;7 PUT DATA FROM MYTEMP TO DEVICE REG AACSR 
4230 O20210 001365 BNE 
west d20e212 4$: 
4233 ;% MOV SBDDAT, IDAC1 ;/ PUT DATA FROM SBDDAT TO DEVICE REG DAC! 
we38 senate tenmuals fence ;% Moy MYTEMP, GAACSR ;7 PUT DATA FROM MYTEMP TO DEVICE REG AACSR 
4237 020236 001365 BNE 
4238 ; DAAT 6,2 
4240 + RERRERER RRR RR ARERR RRR RRR RRR RRR RRR RE ALAR RARE KRAELALRERE 
Hout i TEST ee mare eee ae USER MICRO-CODE CAN BE STARTED 
wes j xTHAT RUN SETS, REA ADY OY IN SETS, READY OUT CLEARS. 
sue g20240 00004 ;jteseenbisnerateneeneusennenaenseuasuanuannannaexaexaexaexaecaes 
4247 
4248 O20242 004737 O40S04 JSR PC, SRESET ; ISSUE_LPA-11 RESET 
wus gedene 032737 000001 oo1202 BIT 1’ $PASS ;ON ALTERNATE PASSES,WE ALTERNATE MICROCODE. 


t i 
4251 Oe0eS& 032777 OO2000 160654 BIT #BIT10,aSWR : RUN ONLY DEDICATED 


DRLPA.P 


020264 


peony cere 


al ge -1i- ORLPA-A 
1l T30 


001007 
004S37 


O441 
513757 
0004 


MACY11_ 27(6S4) 


*TEST THAT USER 


000200 
16104e 


000200 
161024 
001124 


161100 


161066 


161032 
001126 


001126 
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MICRO-CODE CAN BE STARTED 


SEQ 0126 


;LPA-11 ERROR STATUS OUT REGISTER NOT CLEAR AT INIT. 


BNE 10% : CODE? 
:YES DO THAT LOAD. 
13$: ISR RS, SLOAC 
MMAST 
MOV #’M, SVERSN 
BR 11 
10$: ISR RS, SLOAD 
DMAST 
MOV #’D, SVErSN 
BIT agits, aSWR Ruy ONLY MULITE-SER CODE? 
a BNE YES-GO BACK AND RELOAD 
MOVB VERSN SVErSN+1 
BIS #81714, JIKMADO ;SET INIT. 
MOV #4,R1 
12$: JSR PC; SDELAY 
DEC Ri’ 
BNE 123 
MOV sBYT1S!61T11, 9KMAQO_ -BIT 1S OF THE KMC CSR SHOULD BE 
;SET AT THIS TIME. 
MOV #50. ,R1 
1S: BIT #BIT7,aLPCI ;BIT 7_OF CONTROL IN REG. (READY IN) 
BNE 2 :SHOULD BE SET AT INIT 
ISR PC, SDELAY :DELAY FOR WHILE. 
DEC Ri’ 
BNE 1$ 
MOV #8177, SGDDAT 
MOV JLPCI? $BDDAT 
ERROR 17 ;LPA-11 ERROR - READY IN NOT SET AT INIT. 
R TST31 3 
2$: BIT #B1T7,aLPCO ;CHECK READY OUT, IT SHOULD 
BEQ ‘BE CLEAR AT INIT. 
MOV JLPCO, SBDDAT 
CLR $GDDAT 
ERROR 1 ;LPW-11 ERROR - READY OUT SET AT INIT. 
R TST31 ¥ 
3$: - TSTB aLPSO ;CHECK THE STATUS QUT R GISTER 
sIY SHOULD BE CLEAR NIT 
BEQ TST31 <IF CLEAR, NEXT fect 
MOVB @LPSO, $BDDAT 
CLR aSGDDAT 
ERROR 
: eee ee eee 
ikTES #TEST FOR ERROR CODE 306 


+ i 
ter “READY OUT” SHOULD WE SHOULD G 
0 (NO INIT COMMAND) SINCE WE HADN’T 


NG THAT SHOULD 
SET. NEXT 


a GOING TO ISSUE A_ CLOCK START 
HI TAKE PLace 


R #306 
:#INITIALIZED FIRST. AFTER, WE’LL CLEAR “READY OUT” 
:*¥AND MAKE SURE THE STATUS’OUT REG. CLEARS. 


MAINDEC -1li- ORLPA-A 
DRLPA.P11 T31 


06 
4382 os0e 900004 
4 ted OSO4 012737 
Oe0Sl2e 012737 


MACY11 27(654) 


1 


10 
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#TESt FOR ERROR CODE 306 


oooo0i 001160 
O003ee O4411e2 


t 


eee 
it 
MOV #1,STIMES ;;DO0 1 ITERATION 


MOV #BITLIBIT4!BIT6!BIT7,KWT ;SET START CLOCK IN CLOCK TABLE 
; (REQUEST DESCRIPTOR ARRAY) 


SES 0127 


L10 
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DRLPA.P T31 *#TEST FOR ERROR CODE 306 SEQ 0128 
4313 g20s20 012700 o4411e MOV #KWT, RO ;GET ADDR. OF ARRAY 
4314 Oe 012760 000000 oD00002 MOV #0, 20) :SET CLOCK STATUS. 
4315 205 pou CLR 4(0) :SET CLOCK PRESET 
4316 Os05 4 MOV RO. aL PADL 
| 431 Heos4e il eee Ol 160716 BISB pe: SLPCI ;SET GO. 
HE Betas Sava 08h fe Heed [010 “RERDY OUT” SET 
| «4321 17737 7 1126 MOV aLPco AT 
4322 haa p12 35 b8p200 651158 MOV a Pco, $8008 
4323 020576 104017 ERROR 17 ;"READY OUT” FAILED TO SET (LPA-11 ERROR) 
4 G20600 000432 BR TST32 ts 
4 020602 005037 001126 1S: CLR SBODAT 
| 4327 020606 012737 000306 001124 MOV #306 , SGDDAT ; /EXPECT 306. 
4328 020614 117737 160654 001126 MOVB aLPSO, SBDDAT :/SEE WHAT WE GET. 
4329 O20622 023737 001124 001126 CMP SGDDAT,$BDDAT ;DID LPA-~11 RETURN ERROR CODE 
43 #306 - “NO INITIALIZE COMMAND”? 
4331 020630 001402 BEQ 2s 
4 017 ERROR 7 ;LPA-11 ERROR - ERROR CODE #306 NOT RETURNED 
1335 BS pe35 0414 oe +o132 33 
| 4336 020636 005077 160630 2s: CLR @LPCO ;CLEAR “READY OUT 
4337 :ERROR OR STATUS ouT REG. SHOULD CLEAR. 
4338 O20642 105777 160626 TSTB @aLPSO sD10 IT CLEAR? 
4339 020646 001407 BEQ TST32 <YES - NEXT TESt> 
| 4341 020650 012737 oo00000 001124 MOV SGDDAT ; EXPECT 0. 
| 4342 O20656 117737 160612 OO0ll26 MOVB aL30, $BDDAT /SEE WHAT WE GET 
| 4343 020664 104017 ERROR ; STATUS bi? REG. NOT CLEARED WHEN “READY OUT” CLEARED (L 
434S peesesenanadennngesenguoseseesseeseeste a aa ae 
4346 i kTEST 32 *TESt THAT WE CAN GENERATE ERROR CODE 314 
4348 i SIN THIS TESt WE WILL TRY TO GENERATE ERROR CODE 314 
4348 j #CODD ADDRESS SPECIFIED) FOR REQUEST DEScRIPTOR ARRAY <RDA>) 
4351 . 
4352 = REGGAE ERASER RRR REAR RR RRRRRERRRKRRRRRAAKRRRRAAHK RE 
4353 O20666 O00004 +4132: SCOPE 
4354 920670 2700 054130 MOV #DEVLST, RO ;GET_AN 7PQQR. 
4355 74 200 INC R Ree 
4356 020676 010077 160574 MOV RO, LPADL TORE TA ODR. AS ADDR OF A 
4357 REQUEST DESCRIPTOR ARRAY. 
4358 020702 152777 oOO00001 160556 BISB #1, 9LPCI :S 
4359 Ge 219 005000 a CLR RO : TIME OUT COUNTER 
4361 Q20712 105777 160554 , TSTB aLPCO ; READY Y OUT SE SET? 
4 120716 100412 BMI ed : YES-EX 
4363 020720 105200 INCB RO * NO-LOOP OVERFLOW OCCUR? 
4364 b207 2 100373 BPL 1$ :NO-LOOP. 
4365 724 012737 oo0200 001124 MOV 4200 $GDDAT ; EXPECT 200. 
4366 0207 017737 160534 001126 MOV aLPcd, $BDDAT :/SEE WHAT WE GET. 
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DRLPA.P11 T32 *#TEST THAT WE CAN GENERATE ERROR CODE 314 SEQ 
4367 020740 104017 ERROR 17 ;READY OUT NOT SET ON INIT CMND. (KMC-ERROR) 
i328 020742 000414 BR TST33 33 


HA ge 314. 


4370 744 es: 
t7h Reps 918797 9D0RI QL1Ey mov, §314,S9008T 


SEE WHAT WE GET 
a8 Benz 60 ASeGaS 000314 001126 cues #245,00087 ;D1D corRect ERROR CODE GET RETURNED? 
4375 0 
my 020770 104017 ERROR 17 ;ERROR CODE 314 NOT RETURNED FOR ODD ADRRESS FOR RDA 
1378 020772 000400 BR TST33 33 
438 + LEMKE KRREE RRR RRR RR RAR RAR AAAR RAR RRRERREAARRRRERRERARALHRRERE 
4381 ik TEST 33 *TESt THAT THE DEVICE LIST CAN BE VERIFIED 
4383 *INIT TEST_IN THIS TEST WE MAKE SURE THE KMC MICRO- 
{333 :CODE CAN FIND ALL ADDRESSES OF DEVICES TO BE TESTED. 
a3eP 020774 900004 PPT itt 111 Siaaaiaieeelelelelelllllleieaaaneenieiaeiseiaeiaeiiiae 
4388 ° 
4389 020776 012700 o00012 MOV #10.,RO0 
4331 1002 O1e7gi 054130 HOY WDE VCST, RI ;CLEAR DEVICE LIST AREA 
4392 1010 00500 CLR R3 
4393 O2101l2 012721 oo0001 1$: MOV #1,(1)+ T A_1 INTO ALL POSTIONS OF 
4394 DEVICE LISI s soot THOT LER WON’ T RETURN 
4395 SS 
, 3 QuH Ruy ig WOULD ROE TURN ADDR. ERROR 
4398 021016 005300 DEC RO 
ago O51862 BU270 osu mY aBevLST2 A 
+ 
143) 081066 $73? Becd8s o01s62 BIT aBitl, SRI” ;KW11K CLOCK?? 
ms 061038 013721 001570 HOV KLIK, (124 :YES FIX ADDR. 
440S 051044 353 002000 oOolsb2 10S: BIT #BIT10,SR1 ;AR11 CLOCK?? 
4406 1 1405S BEQ 1$ 3N 
sain Os 1054 013711 901616 Hoy ARI IK, (1) YES FIX ARL1K CLOCK ADDR. 
aag6 OsiGe8 297 o20000 oolsb2e 118 Br Ay T13,SR1 sLPS OCK? 
444i 851898 5 i486 5 Bea 133 ERROR es 
4412 021076 013711 001612 MOV LPSit (1) VES FIX witat CLOCK ADDR. 
4413 021102 062721 OO00004 ADD 13+ 
4414 021106 000403 BR 30 os 
4415 021110 12S: 
4416 021110 104017 ERROR 17 ;NO CLOCK SELECTED FOR TESt. 
4417 :CAN NOT DO ANY MORE TEStS WITHOUT 
wats sock oF SELECT A CLOCK. 
4420 021112 000137 030576 IMP ETEST 
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DRLPA.P11 133 *TEST THAT THE DEVICE LIST CAN BE VERIFIE SEQ 0130 
4421 
4422 021116 012721 000001 20S: MOV #1,(1)+ 
4423 ll22 032737 O00001 001562 BIT #8tT0,SP1 ;AD11K FOR TEST?? 
444 021139 GO1403 BEQ 21$ 
44S il 13721 001566 MOV ADL1K,(1)+ ;YES FIX ADL1K ADDR. 
4426 021136 g004e0 BR 30$ 
447 921140 03273 002000 oO01S62e 215: BIT #81T10,SR1 ;ARL1 A/D? 
4428 114 1403 BEQ 22 
4429 021150 01372) 001610 MOV ARLIK, (1)+ 
4430 021154 GO0411 BR O$ 
4431 021156 032737 O10000 O01562e 225: BIT #81T12,SR1 ;LPS A/D? 
4432 021164 001403 BEQ 23$ 
4433 021166 013721 o01612 MOV LPS11,(1)+ 
4434 021172 o00402 BR 0s 
Wa36 021174 Ole72ei ooo0001 238: MOV #1,(1)+ 
4437 1 2737 o00020 o01S62 30S: BIT #B1T4,SR1 ;2ND AD11K? 
d43a beisbe 001403 Bea 
4439 Geie10 013721 001576 MOV ADL1K2, (1)+ 
4440 O21214 O000402 BR 
aa O2l216 Ol2721 oo0001 315: MOV #1,(1)+ 
444 1228 032737 000010 o01S62 32S: BIT #B1T3,SR1 ;ARL1K? 
4444 le 001403 BEQ 33$ 
444s 12@32 013721 001574 MOV AALIK, (1)+ 
4446 021236 Oo004e4 BR 4 
4447 1 737 OO02000 o01562 33S: BIT #81T10,SR1 ;AR11? 
4448 1 ht BEQ 34S 
444g 1 13711 001610 MOV ARLIK, (1) 
4450 1254 721 O00016 ADD #16, (1)4+ 
4451 021260 413 BR 
4452 Gelebe 737 O40000 O01Sb2 34S: BIT #BIT14,SR1 ;LPS D/A? 
4453 Oele 1405 BEQ 35$ 
4454 021272 013711 001612 MOV LPS11,(1) 
445S 021276 062721 OO00016 ADD #16, (1)4+ 
4456 Oel302 oo004de BR 4 
nai 4 021304 Ol2721 oo0001 35$: MOV #1, (1)+ 
4459 021310 032737 OO0004 o01S62 40S: BIT #81T2,SR1 ;DR11K? 
4460 021316 001403 BEQ 
4461 021320 013721 001572 MOV DR11K1,(1)+ 
wabe Oei3e4 g00413 BR 
446 1 032737 100000 o01S62 41S: BIT #81T1S,SR1 ;LPS 1/0? 
4464 021334 001405 BEQ 4 
4465 021336 013711 001612 MOV LPS11,(1) 
4466 Oel342 062721 OO0010 ADD #10, (1)4+ ;FIX LPS11 1/0 ADDR. 
4467 02134 O2 BR 
wiee 13¢8 12721 oo0001 42S: MOV #1, (1)+ 
4470 021354 032737 OO0D40 oOO0l1Sb2 SOS: BIT #BITS,SR1 ;DR11K #82? 
4471 021362 001403 BEQ 
4472 021364 013721 001600 MOV OR11K2, (1)+ 
4473 021370 o0040e BR 52s 
4474 021372 Ole72l oo0001 SiS: MOV #1, (1)+ 


MAINDEC -11- ORLPA-A 


C 
ORLPA.P1 


1 133 
4475 021376 032737 
9 1 0014 
44 14 0137 
W353 141 
447 tise 127 
ee Biss tere 
448 1438 4703 
4483 81434 00402 
4484 021436 012721 
W485 else 737 
4486 14 001403 
4487 O2145e 013721 
4488 021456 O0040e 
4489 021460 012711 
4490 021464 
4491 
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#TES 

000200 
001602 
Boo4o0 
001604 
601000 
001606 
ooo001 


157670 


| 

| 4yguy 

| 4495 021472 004737 

| 4496 021476 012777 
4497 021504 777 

| 4498 Gei512 
4499 021514 O04 2 
Wel O8i ba10 
Su fies tele 
4503 O21 1370 
4504 021534 005037 
4505 21540 008037 
seh, ISIS Agsaue 
4509 021550 105777 
4510 G21SS4 100020 
4512 O215S56 117737 
4513 021564 012737 
4514 021572 122737 
4515 O21600 001402 
4516 021602 104017 
4518 021604 ooo4O4 
4519 021606 017737 
4520 021614 104017 
4521 
yo 
4523 
4524 
4525 
4526 

527 

4528 

| 


THAT THE 


001562 
001562 


001562 


054131 


157772 
157754 


157740 


001126 
001124 
001126 


001124 


Bll 
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DEVICE LIST CAN BE VERIFIED 


Ses: 


S3$: 
SYS: 


sss: 
56S: 


S7$: 
60$: 


4§: 


Ss: 


6S: 


7$: 


#81T7,SR1 
DR11K3, (1)+ 
Sus 

#1, (1)+ 
#6tT8,SR1 
S$ 

DR11K4, (1)+ 
56S 

#1,(1)4 
#81T9,SR1 

DR11KS, (1)+ 
60$ 

#1,¢1) 


VERSN, DEVLST+1 
PC, SRESET 
#OEVLST, JLPADL 
88110, aLPCI 

PC, SDELAY 
#61T7, ILPCI 

6$ 

RO 

S$ 

$GDDAT 

SBDDAT 

17 

TST34 

aLPCO 

TST34 

@LPSO, SBDDAT 
#0, SGODAT 
#326, SBDDAT 


17 


TST34 
fur rts, SECORT 


;DR11K #3 ” 
;ORL1K #4 ? 


;DR11K #5 ? 


;RESET SYSTEM 
;SET INIT POINTER 
;SET GO! 


;NO-WAIT 
;BUT NOT TOO LONG... 


;LPA FAILED TO FINISH INIT. 
:OID CONTROL OUT SET WITH ERROR?? 


a5 
;GET STATUS 
;DEVICE ADDR ERROR? 


;ERROR KNOWN CHECK RETURNED ERROR 
;CODE AGAINST DOCUMENTATION. 


?BAD DEVICE ADDRESS 

*DEVICE DOES NOT EXSISTS? SOMETHINGS 
:FUNNY! PREVIOUS TESTS DIDN’T 

?SHOW THIS ERROR-I'D SAY KMC-ERROR. 


5 06 He He He He AE eH AE aE A aE A a a A a HH a a a a a aE 
*TRY TO GENERATE ERROR CODE 312 


;# 
;*TESt THAT WE_CAN GENERATE ERROR CODE 312 
;*#"USER NOT ACTIVE FOR STOP COMMAND” 





 £TEST 


34 


i 


SEQ O131 


MAINDEC -1i- DRLPA-A 
DRLPA.P11 T34 


021616 
021620 


021626 
021634 


ooo004 
012737 


012737 
012777 


Cll 
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*#TRY TO GENERATE ERROR CODE 312 


PE LEPC TT TT ETT TEE EET TT TT TTT TTT TTT TTT TTT TTT TTT TTT rr 


+4734: SCOPE 
000403 oSS066 MOV #403, JOBO SET USEREL. $I STOP COMMAND IN MODE 
055164 os5072 MOV #JOBOU,JOBO+4  ;SET UP USW ADDR. 
055066 157634 MOV #JOBO, JLPADL !LOAD ADDR OF RDA. 


SEQ 0132 


MAINDEC -11- ORLPA-A 


DRLPA.P11 


oe Biss 


Rene RoR 


; 


SRoRes 


ete he he ee 
Ww 
Oo 


Ror foro frou 


T34 


S822 


—- Om 
N © a 
ens 


——O meee 
QWnNNN 


012737 
117737 


122737 
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#TRY TO GENERATE ERROR CODE 312 


ono001 157616 BISB 41, LPCI 
- CL R 
157614 TSTB @LPCO 
BMI 23 
INCS RO 
BPL 1$ 
000200 001124 MOV #200, SGDDAT 
157574 001126 MOVB aLPcd, $BDDAT 
ERROR 17 
BR TST3S 
2s: 
000312 001124 MOV #312, SGDDAT 
157556 001126 MOVB aLPso SBDDAT 
000312 001126 CMPB ale 12, $8 DDAT 


BEQ 
ERROR 17 


;SET GO. 


; READ OT SET? 


; YES-EXIT 


LOOP 
3NO-LOOP OVERFLOW OCCUR? 
NO-LOOP 


At A eon. 
/SEE_ WHAT WE GET 
; READY ott NOT oer ON CMND (KMC ERROR) 


; EXPECT 3le. 
/SEE WHAT WE GET. 
;D1ID CORRECT ERROR CODE GET RETURNED 


; jSEEEURSennenaneey 10 GHEMATE EA CO 10°C 
IkTES *#TRY TO GENERATE ERROR CODE 310 


MAKE _U 


| MEME | USRE INITIALIZE COM 
i Saat +41 tlle 


$6135 
040626 ISR PC, SRESET 
41 157530 MOV #DEVLST, JLPADL 
41 CLR ope eT ‘ 
001512 054131 MOVB VERSN, DEVLST+1 
O01 157500 B 6 PCI 
aReges , _HiPec, Sbebh 
157470 ; TSTB @LPCI 
ooo200 001124 MOV 300 S$GDDAT 
157454 001126 MOV aLPCt, $BDDAT 
ERROR 
BR ST36 
es: 
oo0000 001124 MOV #0, SGDDAT 
157440 001126 MOVB aLPCO, $BDDAT 
oo00000 001126 CMPB #0, SBDDAT 


;LPA-11 RESET 


PRorcAte sizi 


WE CAN GENERATE ERROR CODE 310 
MAND” . 


DEVICE LIST IN RDA WORD 


;SET VERSION NUMBER 


;SET GO. 


;READY IN SET? 


‘eee 200. 


; READY 1h 85 


NOTE-WE HAVE 
Evens 
STATUS BACK F 
“EXPE 

: /SEE 

;DID A 


WHAT WE GET 
SET ON INIT CMND 


ALREADY DETERMINED 

anne ARE “Ooo 

OR STAT RE 

HAT” WE GET. 

N ERROR CODE GET RETURNED? 


SEQ 0133 


' ERROR CODE 312 NOT RETURNED STOP USER ISSUED AND NO USE 


MAINDEC -11- DRLPA-A 
T3S 


DRLPA.P11 

4591 Oe2e204e 

4592 

u2oq 022044 

oe Bae 

5 

489 20S6 

4$98 2064 

4539 2072 

4600 2074 

4601 028104 

ueos 5 ibe 

eke pest} 

ee esiss 

4607 

4608 pee lee 

4609 Oeel 

4610 022134 

4611 Qeelte 

4612 O22150 

4613 

4614 022152 

4615 

4616 

4617 

4618 

4619 

4620 

46el 

4622 

4623 

4624 

46eS 022154 

4626 

46e7 022156 

46e8 Oeelbe 

46e9 Oeel 
30 Qeel7e 

4631 Oe2e00 
3e Oee 

4633 Oeeele 

4634 

4635 O2222e0 

4636 Oeeeeb 

meg 4 Oeee32 


38 
4639 Oee2e40 


00140S 
117737 
17 


113737 


152777 
004737 
052777 
004737 
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#TRY TO GENERATE ERROR CODE 310 


157424 


054130 
000001 


o4o0Ss4e 
157366 


000200 
1573Se 


000310 
157334 
000310 


o40S4e2 


001126 


000004 
157270 


0S4131 
157240 
157226 


Ell 
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; NO-NEXT 


;PUT ERROR CODE IN FOR TYPEOUT 
; KNOWN ERROR CODE RETURN ON INIT COMMAND 


;RESET ADOR. 
:SET GO-DO ANOTHER INITIALIZE CMND. 


;READY OUT SET 
3 ZEXPECT 200. 


/SEE WHAT WE GET 
READY OUT NOT SET ON INIT COMMAND 


a) 
;7EXPECT 310. 
/SEE WHAT WE GET 
; NOW WE EXPECT ERROR CODE 310 


;ERROR CODE 310 NOT RETURN ON DOUBLE INIT. 


eS ae 


BEQ 3$ 
MOVB @LPSO, SEDDAT 
ERROR 17 
BR TST36 

3$ MOV #DEVLST. JLPADL 
BISB #i,aLcPct 
CLR RO’ 

4S: JSR PC, SDELAY 
TSTB aLPCo 
BMI 5 
MOV #200, SGDDAT 
MOV aLPcb, $BDDAT 
ERROR 17 
BR TST36 

SS: 
MOV #310, SGDDAT 
MOVB aLPSO, $BDDAT 
CMPB #310, $BDDAT 
BEQ 36 
ERROR 17 

i kTES *#TEST INTERRUPTS 


$0 THIS TEST WE’LL MAKE SURE READY IN AND READY OUT 
~via GENERATE INTERRUPTS 


s RHEL RRA EAR RARE RAE RE LAKH RRR KRKEE 


+6736: SCOPE 


PC SRESET 
veer 
$10). 
sia'4 (0) 
HOEVLST, @LPADL 
VERSN, DEVLST+1 
#1,aLPCI 
LAY 
#100, aLPCI 


PC, SDELAY 


w 
Oo 
Ld 


;GET VECTOR ADDR. 
:SET ADDR FOR READY OUT INTERRUPT. 

-SET ADOR FOR READY IN INTERRUPT 
;SET ADDR. OF DEVICE LIST IN RDA WORD 
: INDICATE SIZING 
:SET VERSION NUMBER 


;SET GO. 


; INTERRUPT RIGHT AWAY. 


SEQ 0134 


| 
| 
| 


a EeeeeeeeeSeeeSesesSsesSsS—<“‘i‘“‘“—si‘ O*é 


ll 
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DRLPA.P11 136 *TESt INTERRUPTS SEQ 0135 
4640 
4641 O22244 01273 001124 MOV #300, SGDDAT ;7EXPECT | 300. 
464 2 017737 157210 OOlle6 MOV aLPct, $EDDAT /SEE WHAT WE GET. 
4 2 005077 157202 CLR aLPC ; CLEAR IATERRU PT ah BLE. 
4644 Oeec64Y 104017 ERROR 1 ‘READY IN FAILED TO CAUSE AN INTERRUPT 
4645S Oeecb& 000436 BR TST37 : 
wey 022270 1S:  HELAY SERVICING 
464) 012777 4130 157200 2S: MOV #DEVLST,JLPADL ;SET FOR INIT. 
ue48 p558ee 152777 aeteyt 157162 BISB 5 Pct ‘ 
4650 Oe2304 052777 000100 157160 BIS #BitT6, ALPCO ;SET READY OUT INTERRUPT ENABLE 
we 65 31 005037 177776 a CLR PS 
46 316 004737 o40S4e2 ISR PC, SDELAY 
4654 Oe 100375 BPL 3$’ 
4655 Geese4 012737 o00300 001124 MOV #300, SGDDAT ; “EXPECT 300. 
46 338 017737 157134 001126 MOV aLPcd, $BDDAT /7SEE WHAT WE GET. 
4657 Oee 105077 157126 aLPC ; DISABLE’ ON ERROR. 
4658 O22e344 104017 ERROR 17 ?READY OUT FAILED TO GENERATE AN ERROR 
we58 022346 Oo00406 BR TST37 ts 
4661 022350 4G: 
4662 
4663 022350 S$: 
4664 Oe2e350 105077 157112 CLRB aLPCI 
4665 022354 105077 157112 CLRB aLPCO 
webs 022360 0127 001100 MOV #STACK, SP 
4668 ;STATE LOGIC TESTS DONE. 
uesa 
¢ 
4671 | SEBONDERRENSRARE DERE RN RES EE Denese Heese nenn can ar ATRATED 
4672 i kTEST 37 *#TEST THAT THE LPA-SYSTEM CLOCK CAN BE STARTED 
4673 :*¥IN THIS TEST WE WILL MAKE WE CAN ORDERLY START 
4674 j xTHE SySTen CLOCK IF ONE EXISTS. IF NO CLOCK SPECIFIED BY 
4675 j #SRI ’LL SE AN ANOLOG DEV ICE IS SPECIFIED, IF SO AN ERROR WILL 
4676 ; BE REPORTED D A CLOCK. 
4677 NN ee eee ee och aPEseRn sea sGGRBNSGNORREROSEDERNGnSeES 
4678 022364 o00004 +8137: SCOPE 
4629 022366 012737 OO00001 001160 MOV #1,STIMES ;;D0 1 ITERATION 
4681 022374 004737 O40626 JSR PC, SRESET 
4682 O2e400 012777 OS4130 157070 MOV #DEVLST,@LPADL ;SET ADOR.. OF DEVICE LIST IN RDA WORD 
4683 Oec406 005037 054130 CLR DEVLST : INDICAT 
4684 Gee4¥i2 113737 O01Si2 os4131 MOVB VERSN,DEVLST+1 ;SET VERSION NUMBER 
NESE 022420 152777 o00001 157040 BISB #1, aLPCI ;SET GO. 
4687 Oee426 004737 o40542 ISR PC, SDELAY 
4688 Geet3e 032737 Oe22002 oo01sbe 1S: BIT WBITL'BITIO!BIT13,SR1 ;IS A CLOCK SELECTED? 
4689 QO2e4 001007 BNE 2s : YES-CONTINUE. 
4630 Oee442 032737 010001 O01562 BIT #B1TO!BIT12,SR1 :IS A CLOCK NEEDED? 
4691 Oee4SO O01461 BEQ TSTYO 35 
4692 Oee4S2 104017 ERROR 17 sERROR-NO CLOCK SPECIFIED FOR _ANOLOG 


4693 O2e4S4 000000 HALT :USER MAY NOT CONTINUE-FATAL ERROR 


eee OO 
| 
| 


DRLPA. 
4694 022456 


1 
i758 022612 


4743 022614 


ead age ~11- DRLPA-A 
Pll 137 


00076S 


012737 


003 
052737 


000412 
105777 
100 


bie7a? 
119939 


104017 


000004 
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*#TEST THAT THE LPA-SYSTEM CLOCK CAN BE STARTED 


Ol O4411e 
000115 
000010 O4411e2 


6 
044112 156750 
00 156732 


Oe 156720 


900880 BBL182 


156676 
oooooo 001124 
156664 001126 


i O2e616 Ole737 000001 001160 


6 
4747 O22624 


122737 


000115 001772 


Gll 
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SEQ 0136 
ye a HE Soft 06,28 19 SURTETs URE. SELES 85° cuocx 
:DESELECT ANOLOG OPTIONS. , ’ 
2s: MOV #BITO,KWT ;SELECT_MO TART CLOCK 
cnPe SVERSA, #’M : MUL LTI-REQUEST MODE? 
in BIS 48173, KWT 
‘ MOV uB1T1!8178!B1TO!B1T6 KWT+2 ; RATE: 1MHZ GO. BIT, REPEATED INTERRUPT, IN 
MOV #-10. LO¢K INTERRUPT EVERY 10 USE 
MOV #KidT aK Bee Sut ADDR. IN LPA ADDR. REG 
BIS #B1TO, ILPCI ?SET GO. 
JSR FPELEY 
Bir at 7, aLPCI ;READY IN SET 
MOV $300 SGDDAT 7 XPECT 200. 
MOV aLPct, $BDDAT WHAT WE GET. 
ERROR 17 ; READY a” FAILED TO SET WHEN 
?CLOCK STARTED. 
BR TST4O $3 
3S: TSTB @aLPCO ;ERROR CODE RETURNED? 
BPL TSTYO 33 
MOV #0, SGDDAT $ EXPECT oO. 
MOVB aLPSO, $BDDAT /SEE WHAT WE GET. 
ERROR 17 ; ERROR one RETURNED ON 
:CLOCK START. 


; See ee ae ee eee TEEN HIGNO COO WL Dacia 
; ATES *#TEST THAT THE MULTI-USER MICRO-CODE WILL EXERCISE DRI1K #1 


SEIN "i rest UL ee ie THAT DR11K #1 WILL PASS DATA. 
2 SELEC 5 HIS 


; ¥SRI BI 11K FOR TEST. SRe BITe INDICTES 

pare T THE INPUT IS CALLED BACK TO THE OUTPUT. 

i NOTE: THIS TESt IS A MULTI-USER MICRO-CODE TEST ONLY? 

S IF DEDICATE USER MICRO-CODE, THIS TEST WILL BE BY-PASSED. 


HATHIS TEST a“ yrESe D Py ORDER TO FIND A WILD LPA-11 svsTer FAULT. 
"+ GAPEGT nw AN ERROR HERE UNLESS YOU’VE GOT A HEAVY FAULT. 
} KARBT TRATION Coctc ONE BIG REASON WHY YOU COULD FAIL. ANOTHER 
:#IS THAT INTERRRUPT VECTOR COULD BE WRONG. ALSO THE DMC MICRO-CODE MIGHT 


j SNOT BE EXECUTING PROPERLY. 
FO lee 


igser 
#1,STIMES ;;D0 1 ITERATION 


;7-ORLT- 
CMPB #’M, SVERSN ;RUNNING MULTI-USER MICRO-CODE? 


—— ee eee ee 
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ORLPA.P11 T4O *TESt THAT THE MULTI-USER MICRO-CODE WILL EXERCISE ORIIK #1 SEQ 0137 © 
: YES-CONT 4 
4748 BREEIE BLIP cesov0 es NBSESOY HOVE: esr. | 
47 40 r4 0SS066 18 MO ® 980, RO ;CLEAR OUT THE RDA TABLES 
42 ; nS ee 
6 ossss6 #JOBY 
4754 O226S2 001374 BNE ass 
4755 
4 oe S54 032737 oo00004 001562 BIT #B1T2,SR1 ;IS THIS DRI1K SELECTED FOR TEST? | 
4758 SPES 1 BNE 2s :YES-TEST IT. 
4759 022664 IMP 208 :NO-EXIT THIS TEST. 
qoee 022670 2S: MOV #J0B2, RO ;PICK UP. THIS JOB ADDRESS. 
u7e3 | 958%00 Hoy MBITAIGTT2, (0) gael START ar TAL ONPUT SINGLE CHAN. 
qoea 3$: MOV eBi 54" Bros. ‘ Ere WORD bOuh 
4765 712 MOV ssoBeu,4(0) +USW_ ADD 
47 720 CLRB 6(0) NO a 
476 MOVB #201,7(0) TWO BUFFERS AVAIL. 
47 0227 MOV #BUFFO, 10(0) ?1ST BUFFER ADDR. 
47 Oe MOV WBUFF 1, 14¢0) iho BUFF ER ADDR. 
47 CLR 12(0) EX 
naa 022752 Mov #200, 54(0) ; DELAY =200 <Pat iki 
455 Ose 7 HOV ef; 60°) i Saret Ne gat ORE Chane NO EXTERNAL TRIG 
4775 Oe3002 CLR 640) NO Q START/EVENT A MAKR WORD . 
4776 923008 CLR 66(0) 
4727 02301 CLR 70(0) NO EVENT MASK. 
47 023016 MOV #JOB1,R1 OK=NOW L LETS SET UP THE OUTPUT. 
urey os ars eBIT1EBITS, (1), ne 5 Hiei ait” 
a eaus8 MOV Hs le Tae , bord Sehoet © 
47’ MOV #J0Bi0,4(1) 
4784 CLRB 6(1) nO "eee 
4785 MOVB ry 2 701) 
4786 MOV eBUFF2, 10¢1) SET R a ADDR. 
4787 MOV #BUFFS,14(1) te ADOR 
47) MOV #BUFF2; 20(1) Rod PUT IS NECESSARY 
4789 is co OnE Rb out FOR SAMPLES. LOST 
4790 192 CLRB 1201) - 
479 1 MOV #200, 54(1) DEL xT 1° TICK. 
47 023114 MOV #1-1'56(1) : DEL CHAN #= DR#-1 
47 023122 MOV #1,60(1) :S = ONLY ONE CHA 
4794 023130 MOV #1'62(1) jONE_ TICK BE THEEN SAMPLE 
4795 1 CLR 64t1) :NO START/EV ENT 
47 14 CLR 66(1) ‘NO START MASK. 
4732 1 €LR 70(1) ‘NO EVENT MASK. 
4798 023152 912700 Lesese mov 4125252 RO ;FILL OUTPUT BUFFER W/PATTERN 
4801 653128 615555 06025 MOV #BUFF2, Re 
! 
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*TEST THAT THE MULTI-USER MICRO-CODE WILL EXERCISE ORIIK #1 


OSSO66 


001564 


Ill 


;DRIIK PARAMETER SET UP,T 


;CLEAR INPUT BUFFER 


;OK,NOW WE GOTTO 71°5 THE CLOCK 
:SO’ THAT IT DOEsN’T START ne 


;J0OB #4,WE START CLOCK. 


;FOQUR JOBS. 

/SET UP A FUDGE FACTOR TO 

: “COMPENSATE FOR THE TWO KW11K JOBS 
;7GO DO THEM! 


;/CABLED TOGeTHER? 
:7NOW CHECK DATA IF CABLED. 


Lee Tee EN RTE SEN HIGRO CODE MILL EXERCTS 
*#TEST THAT THE MULTI-USER MICRO-CODE WILL EXERCISE DRIIK #e 


11K FOR 


SURE THAT DR11K #2 WILL PASS DATA. 


ye. one Todi INDICTES 


MULTI-USER MICRO-CODE TEST ONLY! 


13-DEC-77 12:58 
4g: MOV RO, (2)+ 
COM RO 
DEC Ri 
BNE 4§ 
MOV #BUFFO, RO 
MOV #514. ,R1 
S$: CLR (O)+ 
DEC Ri 
BNE S$ 
MOV #11, JOB0 
MOV #0, JOBO+2 
MOV #il, JoB3 
MOV #503 JOB3+2 
MOV #177000, JOB3+4 
MOV #4, SGDDAT 
MOV * FUDGE 
JSR PC, FLASH 
BIT aBrTe, SR2 
BEQ TST41 
MOV #515. RO 
MOV #BUFF2,R1 
MOV #BUFFO; Re 
6S: DEC RO 
BEQ TSTY 
CMP (Re}+, (R1)+ 
BEQ g 
MOV =(R1), $GDDAT 
MOV -(R2)' $BDDAT 
ERROR 12 
20S: 
; ATE 
‘SIN THIS TEST LL a <. 
:*SR1 1 B1TS SELEC 5 HIS 
j ATHAT THE INPUT IS CALLED BACK TO 
i NOTE: THIS TEST IS A 


;* 
; ¥THIS TESt WAS 


I_ DON’T 


RARE TRATION tocte fs S_ONE ag 
3 i 

;*IS THAT INTER 

ome BE EXECUTING PROPERLY 


F DEDICATE USER MICRO-CODE, THIS TEST WILL BE BY-PASSED. 


RRUPT VECTOR 


A WILD. LPA-t4 SYSTEM FAULT. 
an” ANOTH BPAaT. 


5 MMH EEE HE HE HEHE HE HEHE HE EH EE RAR A ERR A AREA AR A RRA REAR ERKEEE 





SEQ 0138 


ll 
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DRLPA.P11 41 *TEST THAT THE MULTI-USER MICROCODE WILL EXERCISE DRIIK #2 SEQ 0139 

4856 023340 oo0004 TST41: SCOPE 

4857 O2e3342 012737 000001 001160 MOV #1,STIMES ;;00 1 ITERATION 

4859 7-DRLT 

4860 923350 122737 000115 001772 cNPB #1, SVERSN ; RUNNING, MULTI-USER MICRO-CODE? 

486 023360 024064 IMP 208 !NO-EXIT THIS TESt. 

4864 023364 oSSO66 18: Mov #J0B0, ,RO ;CLEAR OUT THE RDA TABLES 

4866 3372 ossss6 : CMP RO, #JOBY 

4867 3376 BNE 2s$ 

dees 

4870 3100 000040 001562 BIT aBITS, SRI j1S_THIS DRL 1K SELECTED FOR TEST? 

487¢ 023410 024064 IMP 20S :NO-EXIT THIS TESt. 

sere Se eB 5: HOY HUFTIEra, co» [S40 nt “Aan On, UE 

4899 pS3uS0 aay opo00002 3% Bae eI 1418178, (0) SELECT DIGITAL INPUT SINGLE _— 

487) Deata oss4¥20 000004 ; MOV aJoB2u,4(0) :USW ADDR. 

487 44 000006 CLRB 6(0) *NO EXT. 

4880 Ge3450 1 000007 MOVB #201,7(0) :MAKE TWO BUFFERS AVAIL 

4881 beat 000010 MOV #BUFFO, 1060) ?1ST BUFFER ADOR 

uese aye4 087250 000014 nov HBUFF I, 14(0) j6ND SUFFER ADDR 

4884 Oesi7e oo00s4 MOV #200, 54(0) ‘DELAY =200 TICKS. 

4885 000056 MOV #2-1'56(0) :SET CHAN #=DR11K#- 

48 Ge3516 000060 MOV #1,60(0) :S I Y ONE C 

488 oo0062 MOV #1’62(0) :ON PULS SOT MEEN SAMPLE IS NO EXTERNAL TRIG 

we8e 0238 CLR 640) NO START/EVENT MA 

48 CLR 66(0) ‘NO START MASK 

4830 O2 CLR 70(0) ‘NO EVENT MASK. 

uess | peseue t eM eT Se ca oa te ata 

4894 35 OSe711 BIS #81T4!BIT7! BITS ti) -SELECT DIGITAL OUT. — 

4895 35 12761 i ooo0002 MOV #257. .2(1) T 

4896 3264 012761 OSS302 oO00004 MOV #J0B10,4(1) iset usw ADDR. 

897 35 1 1 oo00006 CLRB 6(1) :NO EXT 

4898 3576 112761 000007 MOVB #202, 7(1) 

4899 o1¢761 9010 MOV aBUFFe, 10¢1) £3 UFFER #1 ADOR. 

4900 le 012761 1254 014 MOV #BUFFS,14(1) T BUFFER #2 ADDR. 

4901 023620 012761 O60252 000020 MOV #BUFF2; 2061) HIRD OUTPUT IS NECESSARY 

4903 o2 105061 oo001e2 CLRB 12(1) No. COnPENSATE a rs a 

4904 p53p8 012761 o00200 MOV #200,54(1) *DELAY 1 TICK. 

4905S 023640 O1e761 000001 o000S6 MOV #2-1'56(1) SET CHAN #= DR#-1 

4906 O23646 012761 000001 O00060 MOV #1,60(1) : SAMPLE ONLY ONE CHAN 

4907 023654 012761 O00001 o00062 MOV #1°62(1) : ONE TICK | BETWEEN SAMPLE 

4908 023662 005061 O00064 CLR 641) :NO START/EVENT 

49039 023666 005061 o00066 CLR 66(1) :NO START “MASK. 
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*#TEST THAT THE MULTI-USER MICRO-CODE WILL EXERCISE ORIIK #2 


000070 
12SeSe 


OS6246 
00100e 


OSSO066 


001124 
002014 


001564 


Kill 


13-DEC-77 12:58 


CLR 701) ;NO EVENT MASK. 
MOV w125252 RO ;FILL OUTPUT BUFFER W/PATTERN 
MOV #514. Ri 
MOV SBUFES Re 
4g: MOV RO, (2)4 
COM RO’ 
DEC Ri 
BNE 4g 
MOV #BUFFO,RO ;CLEAR INPUT BUFFER 
MOV #514. ,R1 
Ss: CLR (0)+ 
DEC Ri 
BNE S$ 
MOV #11, JOB0 ;0K,NOW WE GOTTO STOP THE CLOCK 
MOV #0, JOBO+2 :SO’ THAT IT DOESN’T START UNTIL 
MOV wil,J 5083 jORIIK PARAMETER SET U uP, THEN AS 
MOV #504. 3 3+2 :JOB #4,WE START CLOCK 
MOV eae JOB3+4 
MOV #4, SGDDAT ; FOUR JOBS. 
MOV #2) FUDGE /SET UP A FUDGE FACTOR TO 
COMPENSATE FOR THE TWO KW11K JOBS 
JSR PC, FLASH :/GO DO THEM! 
BIT #B1TS,SR2 ;/CABLED TOGETHER? 
BEQ TST de" 5s 
MOV #515 : “NOW CHECK DATA IF CABLED. 
MOV SBUFES" Ri 
MOV HBUFFO, Re 
6S: DEC R 
BEQ TST42 5; 
CMP (R2)+, (R1)+ 
BEQ 
MOV =(R1), $GDDAT 
MOV -(R2)? $BDDAT 
ERROR 12 
20S: 


; Lee eee eee TA NICHD CODE WILL EXERC Io 
; ATES *TEST THAT THE MULTI-USER MICRO-CODE WILL EXERCISE DRIIK 83 


SEIN T HIS TEST WE’LL MAKE SURE THAT ORI1K #3 WILL PASS DATA. 

5 #GR1 BIT7 SELECTS THIS DR11K FOR TEST. She Wd INDICTES 

.f THAT THE INPUT IS CALLED BACK TO THE OUTP' 

iH NOTE: THIS TEST IS A MULTI-USER MICRO-CODE TESt ONLY! 

s IF DEDICATE USER MICRO-CODE, THIS TEST WILL BE BY-PASSED. 


i STHIS rest WAS DESIGNED IN ORDER TO FIND A WILD LPA-11 svarey FAULT. 
:*#I DON'T REALLY =XPECT AN ERROR HERE UNLESS YOU'VE GOT A HEAVY FAULT. 


SEQ 0140 


cr 


Lil 
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DRLPA.P11 T42 *TEST THAT THE MULTI-USER MICRO-CODE WILL EXERCISE ORII1K #3 SEQ 0141 
4964 ; KARBITRATION LOGIC IS ONE BIG REASON WHY YOU COULD FAIL. ANOTHER 
4365 Hiner Be HA T INTERRUPT. V CTOR COULD BE WRONG. ALSO THE DMC MICRO-CODE MIGHT 
496 
aes 024064 00004 ll a 
4370 012737 000001 001160 MOV #1,STIMES ;;D0 1 ITERATION 
4972 /-DRLT 
4373 gears 1 2737 000115 001772 cHPE #.M, SVERSN RUNNING MUL TI-USER MICRO-CODE? 
4398 024104 000137 024610 IMP 20$ :NO-EXIT THIS TEST. 
4302 4110 O14 700 oSS066 18: Moy #J0B0, RO ;CLEAR OUT THE RDA TABLES 
ic : / 
4979 024116 O2002e7 osssse CMP RO, #JOBY 
4980 Oe4le2 001374 BNE 25$ 
dope 
4383 g24124 eit oo02co0 001562 BIT #8177, SRI j1S_THIS_DRLIK SELECTED FOR TEST? 
1385 Beui3a 00137 o24e10 SMP 20s ;NO-EXIT THIS TEST 
Gage 024140 912700 055322 2s: MOV #J0B2,RO ;PICK UP THIS JOB ADDRESS. 
4988 024144 012710 O0001e MOV #BITI!'BIT3,(0) SET START AND MULTI-USER. 
4389 gev150 05271 900460 aa ie BIS #8 TaigtTe, (0) ; ECT GITAL_ INPUT SINGLE CHAN. 
4e3i Dewies BI 720 pee ooo4 MOV sJoB20,4(0) 3U woe sa 
4992 1 1 CLRB 6(0) :NO EXT. 
uggs Geuene O15? 5 Booo10 Ove #SuFRO taco)  SSST BUFFER-ADOR? 
aae . 
4995 euei0 18760 057656 ooootS MOV BUFF I, 19(0) } 2ND BUFFER ADDR: 
4996 1 1 CLR 12(0) :NO EX 
4997 Oe4e 12 4 MOV #200, 54(0) oe AY =200 TICKS. 
4 1 056 MOV #3-1'56(0) : CHAN #=DR11Ki 
4 1 I BBODED MOV #1,60(0) NG ONLY. 0 “bi ANNEL 
024 12 1 o062 MOV #1 B20) a ct Pin EN SAMPLE IS NO EXTERNAL TRIG. 
2001 OS4S6E 00 000064 cLR pat) NO STAR / VEN MAKR WORD 
2003 $28 eee CLR 70(0) NO EVE ERT WAek. 
012701 os MOV #JOB1,R1 TS SET UP THE OUTPUT. 
nate 012711 aye MOV #BIT1!BIT3, (1) NOH ART AND MULTI USER. 
2007 e78 il BIS SUE isthe," set POG T TAL OUT. 
12761 i ooo0002 MOV #257. .2(1) 
5009 310 012761 5302 o00004 MOV sJOBi0,4(1) :SET USW ADDR. 
5010 024316 105061 Oo00006 CLRB 6(1) NO EXT 
201k Gev3ee iie761 gogede 000007 MOVB #202,7(1) 
soi Gewese level Qevese fooge ney UES ]Q(1) 185 QUEFER $2 6008: 
e018 BS q3a9 515561 peases Bpons0 MOV & FES’ S0¢1) tee Suis UT_IS NECESSARY 
5016 O243S52 105061 00001 CLRB 121) XT 
5017 024356 012761 O00200 oj0054 MOV #200, 54(1) i DELAY 1° TICK. 
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*#TEST THAT THE MULTI-USER MICRO-CODE WILL EXERCISE ORIIK #3 SEQ 0142 
oo0002 oj00ss MOV #3-1,56(1) 136 CHAN #= ORs-1 
000001 o00060 MOV #1,60(1) SAMPLE ONLY CHAN 
1 000062 MOV #1 pat1? TICK | BETWEEN SAMPLE 
4 CLR 64t1) i ONE ST 
000066 CLR 66(1) :NO START MASK. 
000070 CLR 70(1) !NO EVENT MASK. 
125252 MOV a125252 RO ;FILL OUTPUT BUFFER W/PATTERN 
001002 MOV #514. Ri 
060252 MOV eBUrFS Re 
4g: MOV RO, (2)+ 
COM RO 
DEC Ri 
BNE 4§ 
6246 MOV HBUFFO RO ;CLEAR INPUT BUFFER 
1002 MOV #514. ,R1 
S$: CLR (O)+ 
DEC 
BNE gs 
990011 O55066 MOV #11 Jogo ;0K,NOW WE GOTTO STOR THE CLOCK 
550 MOV 308 > 350" THAT abe DOESN’ T START UNTIL 
05 44 MOV as ORITK  P R SET UP, THEN AS 
44 MOV ; 3439 O83+2 + #4, nes oF, T CLOCK. 
177000 OS55444 MOV JOs3+4 


Boshi MOV $4, sapeeT POUR UPA FUDGE FACTOR TO 
: /COMPEN ATE ,FOR THE TWO KW11K JOBS 


036026 JSR PC, FLASH :7G0 DO 
ooo200 001564 BIT sgi?, SR2 ;/CABLED TOGETHER? 
MOV :7NOW CHECK DATA IF CABLED. 
e3 MOV “8 seta" 
o0S6246 MOV 
6$: peg 
CRP TMD aise hie 
001124 SoG tei) GDDAT 
001126 MOV ~ (RS) * Spat 
ERROR 12 
208: 
. j SESEM RSM H NEHER EEE RTH E NAT HTNE MULTIUSER MICROCODE WILL EXERCL 
ATES *TESt THAT THE MULTI-USER MICRO-CODE WILL EXERCISE DRI1K #4 
N THIS TEST WE’LL MAKE SURE THAT DR11K #4 WILL PASS DATA 


tll FEDER En EBs, PS ACE fo Bae: oaRBuPET® BNOICTES 


N1ll 
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DRLPA.P11 T43 *TEST THAT THE MULTI-USER MICRO-CODE WILL EXERCISE ORIIK #4 SEQ 0143 
5072 ;% NOTE: THIS TEST IS A MULTI-USER MICRO-CODE TESt ONLY! 
2073 i F DEDICATE USER MICRO-CODE, THIS TE. WILL BE BY-PASSED. 
sore ET Bin FSRcwts PESBRSEP AAC ORORN be" INPESSMYED, Mab SYREENY ERAT 
5077 ; KARBI TRATION LOGIC IS one BIG REASON WHY YOU COULD FAIL. ANOTHER , 
2078 ais! Hay INTERRUPT VECTOR COULD BE WRONG. ALSO THE DMC MICRO-CODE MIGHT 
5080 1a 
eps 024610 op0004 ji tieeenensngueneenenssenassenenenansneensnensanenenens RRARRHARER 
2083 O246le 012737 O00001 001160 MOV #1,STIMES ;;D0 1 ITERATION 
508s 7-DRL 
2086 g24620 120737 000115 001772 cNPE #2", SVERSN ats, MUL TI-USER '“ICRO-CODE? 
2088 024630 000137 025334 IMP 208 NO-EXIT THIS TEST. 
5090 012700 osso066 1$: MOV #JOBO,RO sen OUT THE RDA TABLES 
5091 O2e46 005020 25s: CLR (RO)+ 
5092 Oe%642 020027 osssss CMP RO, #JOBY 
5093 Oe4646 001374 BNE 25$ 
a 
203 D24650 032737 000400 001562 BIT #8178, SRI ;1S_THIS DRL K SELECTED FOR TEST? 
2098 ener 025334 IMP 20S :NO-EXIT THIS TEST 
5100 2s: MOV #JOB2,RO ;PICK UP THIS JOB ADDRESS. 
2101 MOV #BITI'BIT3,(0) SET START AND MULTI-USER. 
2155 po0002 3S ay wey Sige iSELECT OiGriat INPUT se 
2108 000004 , MOV #70820, 4(0) > USWd 5 
1 CLRB 6(0) :NO EXT. 
5106 000007 MOVB #201,7(0) ?MAKE TWO BUFFERS AVAIL. 
5107 000010 MOV SBUFFO, 1000) :1ST BUFFER ADDR. 
5108 14 MOV #BUFF 1; 14(0) :2ND BUFFER ADDR 
510 CLR 12(0) :NO EXT. 
5110 SY MOV #200,54(0) : DELAY =200_ TICKS. 
Sill ooo0S6 MOV #4-1'56(0) ser CHAN 8=D DRIKS-1. 
Sile 000060 MOV #1,60(0) AMPL I 
g113 o00062 nov 81,820) i ON Sart ia ene SAMPLE 5s NO EXTERNAL TRIG. 
S115 CLR 66 (0) NO 
3118 CLR 70(0) NO VENT na 
5118 01 MOV #JOB1,R1 ; OK- =NOW LETS SET UP THE QUTPUT. 
2118 711 MOV #BITL'BIT3,(1) {SET MULTI USER 
51 711 BIS sB8IT4!erT7!erts, t1) ;SECECT DIGITAL OUT. 
512i S026 012761 OO040i oD0002 MOV #257. .2(1) ;WORD COUN 
pice S034 012761 S 000004 MOV #JOBiU,4(1) :SET USW RODR. 
Sle 5042 105061 00 CLRB 6(1) :NO EXT. 
510% OeS046 112761 O0020e 000007 MOVB #202,7(1) 
€1°S O250S4 012761 O60eS2 O00010 MOV #BUFF2, 1061) ;SET BUFFER #1 ADDR. 
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DRLPA.P T43 *#TEST THAT THE MULTI-USER MICRO-CODE Ice T EXERCISE DRI1K #4 SEQ 0144 
5126 rt) 012761 061254 000014 MOV #BUFF3, 14(1) ;SET BUFFER #2 ADDR. 
S127 0250 012761 pease? 000020 MOV #BUFF2) 201) *THE THIRD OUTPUT IS NECESSARY 
5128 :TO COMPENSATE FOR SAMPLES LOST . | 
5129 76 105061 CLRE 121) :NO EXT . 
2130 108 12761 oo000S4 MOV #200, 54(1) ‘DELAY 1 TICK. 

5131 110 012761 000056 MOV #4-1'56(1) :SET CHAN #= OR#-1 

5132 025116 Ole761 000001 000060 MOV #1,60(1) : SAMPLE Y_ ONE 

5133 geS1e4 2761 000001 o0006e MOV #1°62(1) :ONE TICK BETWEEN SAMPLE 

5134 1 pieret 000064 CLR 64t1) NO START/EVENT 

5135 136 005061 66 CLR 66(1) :NO START MASK. 

2136 142 005061 000070 CLR 70(1) *NO EVENT MASK. 

5138 025146 012700 125252 MOV #125252, RO ;FILL OUTPUT BUFFER W/PATTERN 
5139 025152 012701 001002 MOV #514. Ri 

5140 925156 o1 7 060252 MOV #BUFF2, R2 

S141 1 10022 4S: MOV RO, (2)4 

S142 025164 005100 COM RO 

5143 025166 005301 DEC 1 

eiud 025170 001374 ug 

5146 025172 012700 oS6246 MOV #BUFFO, RO ;CLEAR INPUT BUFFER 

5147 0251 012701 001002 MOV #514. ,R1 

at =e 

size Geen Obi me 

5152 10 012737 11 O55066 MOV #11, JOB0 ; OK, NOW HE, GOTTO STOR THE cLocK 
3153 16 016737 000 055070 MOV #0 JoBp+2 :SO’ THAT IT DOESN’T START UNTIL 
5154 24 012737 0011 o55440 MOV sil J jDRITK PARAMETER SET UP, THEN AS 
51ss gese3e G1e737 oss44e MOV se04°5 oa 34 2 :JOB #4,WE START CLOCK. 

5156 127. radiate o55444 MOV 8177000 JOB3+4 

5157 025246 012737 O00004 001124 MOV 4, SGDDAT ;FOUR JOBS. 

5158 025254 012737 O00002 O02014 MOV #2’ FUDGE :/SET UP A FUDGE FACTOR TO 
5159 ; COMPENSATE , FOR THE TWO KW11K JOaS 
5160 a2 004737 036026 JSR PC, FLASH :/GO DO tHEM! 

5i6e O2S526S 032737 O00400 001564 BIT #8178, SR2 ;/CABLED TOGETHER? 

5163 025274 001417 BEQ TSTY +3 

5164 025276 41271 001003 MOV vels. :/NOW CHECK DATA IF CABLED. 
5165 Oe5302 0:2701 o60252 MOV SBURES™ Ri 

5166 025306 Ole702 OoS6246 MOV #BUFFO; Re 

5167 GeS3i2 005200 6S: DEC RO 

5168 025314 001407 BEQ TST44 35 

5169 16 Oeee221 CMP (R2)+, (R1)+ 

5170 025320 001774 BEQ 6$ 

5171 OeS322 014137 001124 MOV -(R1),S$GDDAT 

217¢ 025326 014237 001126 MOV -(R2); $8DDAT 

5174 025332 i04012 ERROR 12 

517S 025334 20S: 

2158 

S178 2 Se eee AT INE HULTIAUSER MICRO-CODE MILL EXERCIS 
5179 i kTES 44 *TEST THAT THE MULTI-USER MICRO-CODE WILL EXERCISE DRIIK #5 


‘on =) 
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DRLPA.P11 TH4 *TESt THAT THE MULTI-USER MICRO-CODE ILL EXERCISE ORLIK #5 SEQ O14S 
ete? SIN THIS TEST WE’LL MAKE SURE THAT D DRI1K #5 WILL PASS DATA. 
1 a 
B18 EEPHAT Hie PABEE Ps CAP PB AK ck Fo bd of BUF? 
5185 s NOTE: THI sa R MICRO-CODE TEST ONLY! 
218 i PTR EU TCATE USER UE TeRO- ODE, ROTs PEst BILD Be BY-PASSED. 
5188 ; #THIS TEST Was DESIGNED al ORDER TO FIND a MILD, LPA-11 SYSTEM FAULT. 
2189 tet Tin Tonto eis" ok HERE UNL VE GOT A HEAVY FAULT. 
190 iH B TRATI Loat¢ ONE ig R REASO N HAY E Feu yeu B FAIL. ANOTHER 
5191 NG. ALSO THE DMC MICRO-CODE MIGHT 
213e is thot "HE TNT RRR 
5194 = REKEKEKRKLRKRKREEERARRRARRSRKKRAAARAERRLRRARRRRRKERAHSHAREKAAKKEES 
5195 025334 900004 “eee SCOPE 
2196 025336 012737 oo00001 001160 MOV #1,STIMES ;;00 1 ITERATION 
5198 /-DRLT 
4 1ge7 7 000115 001772 CMPB #’M, SVERSN ig ING MULTI-USER MICRO-CODE? 
4 BEQ 1$ YES-CONTINUE. 
ee0) 137 026060 IMP 20S NO-EXIT THIS TEST. 
5203 012700 osS066 1$: MOV #JOB0,RO anni OUT THE RDA TABLES 
pecs 4 25s: CLR (RO)+ 
Beds og oSSSS6 cre RO, #J0B4 
20s 
5209 0253 032737 o01000 001562 BIT #81T9,SR1 ;1S THIS DR11K SELECTED FOR TESt? 
S210 OeS402 001002 BNE 2s :YES-TEST IT. 
e514 025 000137 026060 IMP 20S :NO-EXIT THIS TEST. 
1 410 O1 055322 2s: MOV #J0B2, RO ;PICK UP THIS JOB ADDRESS. 

5214 414 reat 000012 MOV #BIT1'BIT3,(0) SET START AND MULTI-USER. 
5215 yea 1 20 BIS #B1T4'B81T8; (0) ;SELECT DIGITAL_INPUT SINGLE CHAN. 
beib 4 1 ooo002 3s: MOV #257. .2(0) ; COUNT 
esta ua0 oe Core #70820, 4¢0) iy 
5219 444 it 1 900007 MOVB #201,7(0) RAKE TWO BUFFERS AVAIL. 
5220 1 010 MOV SBUFFO, 10(0) ;1ST BUFFER AD 

957250 000014 MOV SBUFF 1; 14(0) : 2ND FER ADOR. 

1 CLR 12(0) {NO EXT. 

po0206 MOV #200,54(0) :DELAY =200 TICKS. 
5224 1 MOV #5-1'56(0) :SET CHAN #=DR11K#-1. 
Bese 1 1 MOV #1,60(0) : ING ONE CHANNEL 

14 Ol 066 Mov #1 6e(0) 5 ON PULSE BET WEEN SAMPLE IS NO EXTERNAL TRIG. 
ee ene 

255, fSeese BoetbR ponte? CLR 66(0) NO START MA a4 
2229 025532 000070 CLR 70(0) :NO EVENT MASK. 
5231 025536 012701 os5204 MOV #JOB1,R1 ;OK-NOW LETS SET up THE QUTPUT. 
52 0255 012711 O00012 MOV #BIT1'BIT3,(1) :SET START AND MULTI USER 
5233 025546 052711 o00620 BIS #BIT4!BIT7! BITS, (1) ;SELECT DIGITAL OUT. 
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DRLPA.P1L THY *#TEST THAT THE MULTI-USER MICRO-CODE WILL EXERCISE ORIIK #5 SEQ O146 
Bead pe555e 12761 g00401 ooo002 MOV #257. ,2(1) ;WORD COUNT 
5236 025 TOSOE1 000006 js CORB eJOBiU,4¢1) 1 e lmatt 
ee37 Oese7e jiezel 7 MOVB #202,7(1) ? , 
= teret Getees Ooo? ey peurrscis(l) 7867 BEER $2 foe 
seu0 B5ep08 Bisset Beases eat MOV SBUFFS’ 2061) i Phe HERE oufPur 1S NECESSARY 
1 , nape beaks >TO COMPENSATE FOR SAMPLES LOST 
254 Oesbee yt 1 oo00s4 MOV 134 »54C1) i DeLay 1° TICK. 
Bead o1 761 oo00S6 MOV #5-1'56(1) :SET CHAN #= DR#-1 
Se4S OeS6 12761 1 000060 MOV #1,60(1) :S E ONLY ONE CHAN. 
Bee O1e761 900001 000062 MOV #1'62(1) :ONE TICK BETWEEN SAMPLE 
4 1 4 CLR B4t1) ?NO START/EVENT 
5248 Gesbbe 005061 oo0066 CLR 66(1) :NO START MASK. 
eeu3 005061 000070 CLR 70(1) :NO EVENT MASK. 
Bsek ges67e 918700 S 52 mov "125252 RO ;FILL OUTPUT BUFFER W/PATTERN 
5253 025702 Ole702e O602Se MOV #BUFF2, Re 
S2s4 925706 010022 4$: mov RO, (2)4 
oe ae fg 
1 i NE 4 
5259 716 012700 oS6246 MOV #BUFFO, RO ;CLEAR INPUT BUFFER 
2ge0 2 12701 001002 - nov #514. ,R1 
S262 025730 005301 ° DEC Rl 
beb3 025732 001375 BNE S$ 
734 0127 00! MOV #11, J080 ; OK, NOW GOTTO STOP THE CLOCK 
ese BSesas 818535 gopel. Beans MOV Sd sdgs2 'S0’ THAT TT DOESN'T START UNTIL 
e5e9 pseree 18737 Bopeas = peeuue Roy OLL0R2 «= PRL IK, PRRAUR TED BE oth THEN As 
SH a ee a | 
5271 Bi 3% pBppBe posai4 MOV $2’ SUBSE rroye dp °3" Fupce FACTOR TO 
5272 : “COMPENSATE FOR THE TWO KW11K JOBS 
274 026006 004737 036026 JSR PC, FLASH :7GO DO THEM! 
75 026012 032737 OO1000 001564 BIT #B1T9,SR2 ;/CABLED TOGETHER? 
5276 Oe602e0 001417 BEQ TST4S’ ts 
5677 Bsetee 13% ‘ 901003 Mov W515. RO, :7NOW CHECK DATA IF CABLED. 
Ears Gesose Gie7oe OsceNe os, ROY RUFF; Re 
5281 O26040 001407 ; BEQ TSTYS 33 
2e8e 2 Oeeze! CMP (R2)+, (RL)+ 
4 1 BEQ 6$ 
5°84 46 014137 001124 MOV =(R1), $GDDAT 
beBs O260S2 014237 O01126 MOV -(R2)’ $B8DDAT 
5287 


026056 104012 ERROR 12 


Ele 
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DRLPA. *TESt THAT THE MULTI-USER MICRO-CODE WILL EXERCISE ORII1K #5 SEQ 0147 

S288 026060 20S: 

5289 

259, 

S2ese . j TETRA SHEA HH eee TATE EPA SYSTEM USER MICRO-CODE’S ABILITY TO 

5293 ; ATES *TEST THE LPA SYSTEM USER MICRO-CODE’S ABILITY TO TAKE SAMPLE SINGLE JOB 

5295 i SIN THIS TEST WE’LL VERIFY ANOLOG SAMPLING ABILITIES. 

5296 :xDATA WILL BE TAKEN ON ALL CHANNELLS THROUGH ONE JOB. 

5297 :#AT THE CONCLUSION, IF_A WRAP AROUND MODULE WAS ON THE ANOLOG 

298 :#MODULE, A CHECK WILL BE MADE ON SPECIFIC CHANNELLS 

5299 :4FOR SPECIFIC VALUES. 

Beat + 

5302 j THIS S TEST WAS PPE RPeCT A IN. ORDER TO FIND A WILD LPA-11 SYSTEM FAULT. 

5303 j#1 REALLY ERROR HERE UNLESS YOU’VE GOT A HEAVY FAULT. 

5304 {RARBITRATION LOGI¢ G REASON WHY YOU COULD FAIL. ANOTHER 

5305 :"IS THAT 7 VECTOR BTS ULD Be BE WRONG. ALSO THE DMC MICRO-CODE MIGHT 

2308 janOT BE estatin 

5308 ce REKKKRKEEEALRKRERESERKRERKRAERA RE RAARAE SAAR ARE RELA RRKEAERRERARKRERES 

3308 026060 000004 tST4S: SCOPE 

esi 060% 032737 012001 001562 BIT #B1T12!B1T10!8170, SRL ;IS THERE AN ANOLOG DEVICE? 

5313 2 1 026416 one 20s 

5314 76 012737 170000 O44116 1S: MOV #170000,KWT+4  ;RESTART CLOCK AT 1 MEGHZ RATE 

esis 104 aiie 153364 MOV SKWT , JLPADL 

5 18 11g 777 Badd 1 153346 BIS #8170, aLPCI 

B37 026120 012700 OSS066 — nov #J0B0,, RO ;CLEAR OUT JOB AREA. 

5319 1 056230 : CMP #JOB7R, RO 

5320 BSeise aye BNE ; 

5322 134 O1 OSS065 MOV #JOBO, RO ;GET SET TO dO SINGLE JOB RDA 

5323 140 rte 000002 MOV #2, (03 

5324 144 19 000 2s: BIS #6tT9, (0) ;SET_ SEQUENTIAL CHAN SAMPLE ; 

S36 i 001772 cnr 8.0, SVERSN :MULTI USER MICRO-CODE? ; 
7 1 BIS #B1IT3, (0) ie ROA MODE WORD. 

5328 1 oo0002 3s: MOV we57 20) ser BUFFER IZE. 

2359 : ee OCR sae) on 

5331 000010 MOV #BUFFO, 10(0) Coe EAR Y Si HOR. ADDRESS 

5332 18 14 MOV #BUFF1,14(0) 

5333 0020 MOV #BUFF2’ 20(0) 

5334 eb 007 MOVB #2, 7(03 ; INDICATE HOW MANY BUFFERS USED. 

B335 Oebe 001772 CMPB #°0, SVERSN IF THIS IS DEDICAT 

5 42 BNE 31$ :WE MUST LET BUFFER | OVER RUA BE NON-FATAL. 

53 026244 000007 BISB #BI1T7,7(0) j DEDICATED MODE IS JUST TO FAST FOR 

5338 eee: ic *THE SIZE BUFFER AND Style WE USE HERE. 

5340 Oe625e 000054 ‘ MOV #100. ,S4(0) ;SET DELAY BEFORE START 

5341 Oeb260 000060 MOV #16. ,60(0) :SET # OF CHANNELS 
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THE LPA syd EM USER MICRO-CODE’ ABP ity TO TAKE SAMPLE SINGLE JoB SEQ 0148 
ooo0b2 4S: MOV #+1 620) # OF TICKS BETWEEN SAMPLES 
000056 MOV #400, 56(0) gr ART CH 0, INC=1 
034454 MOV 60(05 , CHANU 
001124 MOV #1, SGDDAT ;ONLY ONE JOB. 
JSR Pc ASH :GO-D00 IT. 
001564 BIT ep tyO!BIT4:B1T10, SR2 ;GS034 WRAPAROUND MODULE? | 
? YES-LETS CHECK OUT THE RESULTS! 
INC REPOR 
MOV #J0B0, RO | 
MOV aLISTiO.R3 ;GET LIST OF S/B RESULTS FOR 10 BITS. 
001562 BIT #61710, 0, 5R1 ;SEC IF 12 BIT A/D 
MOV #LIST12,R3 ;GET LIST OF 12 BIT A/D RESULTS. 
S$: MOV #4. ,Re :CHECK 4 CHANS 
65: MOV (3)’ CHANS ‘PICK UP CHAN # 
MOV (3)4, CHANF : 
MOV (3)+) AVEXP 
MOV (3)+' TOLER 
JSR PC, AVER 
DEC Re 
BNE 6$ 
20S: 
5 eee a eee EA eyaTEn USER MICRO-CODE’S ABILITY TO 
j ATE *%TESt THE LPA SYSTEM USER MICRO-CODE’S ABILITY TO TAKE RANDOM SAMPLES SI 
SEIN T HIS TEST WE’LL VERIFY ANOLOG SAMPLING ABILITIES. 
jaOnTA WILL BE TAKEN AN ALL CHANNELLS THROUGH ONE JOB. 
:%THE DIFFERENCE BETWEEN THIS TEST AND THE ONE BEFORE IF IS THAT 
suonTa IS TAKEN IN RANDOM CHANNELL MODE INSTEAD OF SEQUENCAL. 
Tune CONCLUSION A WRAP AROUND MODULE WAS ON THE ANOLOG 
 SBOOULE CHECK Mth BE MADE ON SPECIFIC CHANNELLS 
*FOR EEE CTF ic VALU 
? 
VY FAULT. 
et: ARBS TRATIONS Logic 1S One Be REASON WHY YOU COULD FAIL. ANOTHER 
'*#IS THAT INTERRRUPT VECTOR COuUL WRONG. ALSO THE DMC MICRO-CODE MIGHT 
senor BE EXECUTING PROPERL 
MPSS TTC TCC CTT TT TT TT TTT TTT TT TTT TTT Tt ttt Tt Tt tt ttt tt ttt ttt ty 
tST46: SCOPE 
001562 BIT #91T12!B1T10!8170, SRL ;IS THERE AN ANOLOG DEVICE? 
IMP 205 
O44116 1S: MOV #170000 KWT+4 ;RESTART CLOCK AT 1 MEGHZ RATE 
153026 MOV #KWT. JLPAD 
153010 BIS = #B1 TO, aLPCt 


| xTHIS TEST WAS SiGNED IN. ORDER 9 FIND A WILD LPA-11 SYSTEM FAULT. 
By FRE Py PESse ae RRR HE f& UNLESS YOU’VE GOT A HEA 

| 
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12:58 PAGE 119 
E’S ABILITY TO tAKE RANDOM SAMPLES SINGLE JOB 


#JOB0,RO 
(Q)+ 
#JOB7R, PO 
10$ 


#JOBO, RO ;GET SET TO dO SINGLE JOB RDA 
#2, 05 
#’D, SVERSN ;MULTI USER MICRO-CODE? 
#BI1T3, (0) ;YES-TELL RDA MODE WORD. 
257. ,2(0) ‘SET BUFFER SIZE. 
sJOBOuU,4(0) :SET USW WORD. 
a4(0) ‘CLEAR USW WORD. 
#BUFFO, 10(0) :NOW SET BUFFER ADDRESS 
F1;14(0) 
#BUFF2’ 20(0) 
#2,7(03 ; INOICATE HOW MANY BUFFERS USED. 
Ob, $VErSN :IF THIS IS DEDICATED MODE 
1$ :WE MUST LET BUFFER OVERRUN BE NON-FATEL. 
#BIT7,7(0) ‘DEDICATED MODE IS JUST TO FAST FOR 
‘THE SIZE BUFFER AND STYLE WE USE HERE. 
#100. ,S4(0) ;SET DELAY BEFORE START 
#7. .60(0) :SET_ # OF CHANNELS 
#+10,62(0) :# OF TICKS BETWEEN SAMPLES 
#JOBOR, S00) :SET ADDR OF RANDOM CHANNEL LIST 
60(0) CHANU 
sJOBOR, RO :PICK UP POINT TO RANDOM LIST. 
a, (0)4 :CHAN O FIRST 
#3, (0)+ :NEXT CHAN 3 
#2; (0)+ :CHAN 2 NEXT 
43, (0)+ : CHAN 
#4. (0)+ ;NEXT CHAN 4 
#15, (0)+ :CHAN 15 
43 to) *CHAN 3 NEXT. 
tT1S!B1T14, (0)4;NOP AND END OF LIST. 
1, $GDDAT :ONLY ONE JOB. 
PC’ FLASH :GO- ; 
sBtT9!81T4!B1710, Ske ;GS034 WRAPAROUND MODULE? 
:YES-LETS CHECK OUT THE RESULTS! 
REPOR 
#JORO, RO 
aL IsTio R3 ;GET LIST OF $/B RESULTS FOR 10 BITS. 
ab! 10, 5Ri ;SEC IF le BIT A/D 
#LIST12,R3 ;GET LIST OF 12 BIT A/D RESULTS. 
#4. ,Re ‘CHECK 4 CHANS 
(3)’ CHAN :PICK UP CHAN # 
(3)4, CHANF ; 
(3)+) AVEXP 
(3)+’ TOLER 
PC, AVERR 


;CLEAR OUT JOB AREA. 


SEQ 0149 


Hle 


MAINDEC -1l1- DRLPA- -A MACY11 27(654) 13-DEC-77 12:58 PAGE 120 
DRLPA.P11 T46 *TESt THE LPA SYSTEM USER MICRO-CODE’S ABILITY TO TAKE RANDOM SAMPLES SINGLE JOB SEQ 0150 
701 Ss 

5481 BSs012 Boraes AE OCS 

eves 027014 20S: 

Syuss Peet ee AT PAL TT 1006 CAN BE STARTED ANO RUN 
pide TEST 4 *TEST THAT ert JOBS CaN ARTED AND R 

4 STR THis TEST, WE'LL ATTEMP TUP U 18. EIGHT JOBS WITH 
54s8 j AMUL TIUSER nIERO CODE. wat? Barone, TED IF 

5459 j MULT IY RM cRO-G in +6 FA 

Suet BERS ICU OR CONE! Ogs Ray BE BEING UPON Tie 

abe + #BELOW A cet BER AS AS AnD voUR SveTEn ARE SET UP. 

5464 1% JOB#0 11K@1l (IF ) OR LPS A/D OR ARII 

S465 1% I al Bai iker CE Cone {SURED OR LPS 170 OR ARII 1/0 
S466 1 a IO AALIK CIF CONF D) OR LPS OR ARL1 

5467 :% JOBS3S ADLIK#e (IF CONFIGURED) 

5468 3 JOBS4 Likes (IF C Net D) 

5469 1 JOBss llKaa (IF C ) 

54 1% JOBS 11K#4 (IF CONFI D) 

5471 1 JOB87 DRLIK#S (IF CONFIGURED) 

2455 $ 

td 

5474 j KEN WE SET UP THESE J WE’LL SET THEM UP TO START ROUGHLY 
EN an T THE SAME TIME BY VBRERG THE START UP DELAY. 

5477 ¥WHAT WE GONNA LOOK FOR AN ERROR INDICATION 

5478 j x15 Fone ER ORS ON JOBS, OR SOME JOB TO FAIL TO FINISH. 

5480 

S461 = REGGE EEEE ERE EERE ERAGE REALE KARR E RRA KKERRAARKERL AAA AHAAAAHRER 
SY 027014 900004 +éT47: SCOPE 

5483 7016 012737 oc0001 001160 MOV #1 STINES ;;DO 1 ITERATION 

5484 70e4 122737 000115 001772 CMPB #’° A, SVERS 

S4ss 7036 O0140e BEQ I 
5486 0001 030220 IMP 
5487 7040 Ole7 OSS066 1S: MOV +R 

4 tn : 7 055204 nov Be Ry R ;GET DIF IN ADDR. BETWEEN JOBS. 
5490 027052 005020 2s: CLR 
5491 7054 genge? 056230 CMP (9) $J087R 
eae BN $' 

4 7 1124 CL GDDAT 

S434 7 12001 001562 BIT #BITO!BITIO!BIT12,SR1 ;ANY A/D’S? 

sis fertre Gia708 Roy ooo,no | faeretgn BCUngE 

4 a Biss? BRabES MOV gic, (0) i G5 be OB Rp aT ART: A/D. 
5498 027106 05271 BIS sarte (0) 1 OONELE CHAN 
5499 Oe71lle O1le760 O00Si2 oo0002 MOV #512,2(0) ‘TAKE Sl2 SAMPLES 

5500 027120 012760 OS55164 9O00004 MOV #JOBOU,4(0) 

5501 027126 005070 CLR a4(0) ;CLEAR USW 

S502 Oe7l3e 152760 oO00200 op0007 BISB #BIT7,7(0) :BUFFER OVERRUN NOT FATAL, ONE BUFFER. 
5503 027140 012760 OS6e4%6 O00010 MOV #BUFFO, 10(0) :SET BUFFER ADDR. 
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DRLPA.P11 T47 *TEST THAT MULTI JOBS CAN BE STARTED AND RUN SEQ O1S1 

5504 027146 012760 o00010 ocooosY MOV #10,S54<0) ;SET DELAY BEFORE START. 

550s Ge? ist 912760 000016 o00060 MOV #16;60(0) :SAMPLE 14 CHANNELS 

7lb2 01027 000010 000062 MOV #10'62(C) :SET SAMPLE RATE. 

5507 7170 OO 001124 INC $GDOAT 

5508 7174 012760 OO0400 oo00s6 MOV $400 560) ;START CHO, INC=1 

55039 027202 3$: 

5510 

5511 

b518 ; 7-SDRM- 

5514 027 032737 100004 001562 BIT #B1T2!B1T15, SRI ;/THIS DRI1K #1 OR LPS I/O SEL? 

5515 7210 OO144e BEQ 64S 

5516 Oe7ele 060 ADD R3,RO i ZUPDAT JOB STORAGE AREA POINTER. 

5517 Ge7els 12710 000432 MOV #432, (0) :/SET 170 START, MULTI-USER, INPUT SINGLE CHAN. 

5518 027220 Ot 000256 oo00002 MOV 2567 2(0) : “WORD COUNT 

5519 Oe7ee6 012760 055302 004 MOV sJOBLU, 40) 

5520 7234 012770 o00000 OO0004 MOV #0, 04(0) ;/CLEAR USW 

3oe1 cove g12760 000 MOV #0,6(0) 

5Se2 7 127 000010 MOV #BUFF2, 10(0) ;/SET BUFFER ADDR. 

5523 7 G05060 le CLR 12(0) 

5524 0e7 0052 001124 I SGDDAT ;RECORD THIS JOB 

5525 7 b12760 000100 4 #100, S40) *DELAY BEFORE START. 

5526 72 12760 o00000 o00056 MOV #1-1'56(0) ; “SELECT CHAN # 

5527 7 012760 000001 Oo00060 MOV #1,60(0) /SAMPLING ONLY” ONE CHAN. 

5528 7310 012760 O00001 o00062 MOV #1;62(0) : SAMPLE RATE 

2230 027316 64S: 

5532 027316 032737 O42010 o01S6e2 BIT #BIT3!BIT1O!BIT14,SR1_ ;0/A OUTPUT SELECTED? 

5533 7 001440 BEQ 5 ;NO-NEXT SET-UP 

5534 027326 005237 001124 INC $GDDAT 

5535 ;ALTHOUGH WE’RE GONNA WORK 

5536 ‘WITH D/A, NO OUTPUT 

5537 ‘WILL RESULT. D/A THROWN IN 

5538 ;JUST TO TRY AND F L 

55339 027332 060300 ADD R {UPDATE JOB STORAGE AREA POINTER 

5540 027334 012710 oole2le MOV eptT1 281 73!B117!81 13, ¢ START. 0/A, SEQ. CHAN. 

5541 O27340 Ol 000256 oo000e MOV $ 2(0)  SPeRaee 

5542 027346 Ole oSS420 o00004 MOV #JOB2U,4(0) 

5543 027354 012770 o00000 ocD000 MOV #0, 04(0) tun USW. 

5544 027 012760 oo0000 oc00006 MOV #0;6(0) 

554s 7370 O1e? Ob 1esH 010 MOV aBUFF 3 10(0) ;BUFFER_ADOR. 

S546 7376 Ole7 100 0054 MOV #100,54(0) :DELAY BEFORE START. 

5547 027404 01027 000056 MOV #0,56(0) ;7SAMPLE CHAN 0 

5548 Geral 012760 000001 900060 MOV 1°60(0) /7SAMPLE ONLY ONE CHAN 

3549 74 0127 000001 9000062 MOV #1;62(0) :/SAMPLE RATE 

5551 7426 032737 O00020 oOolSbe SS: BIT #B1T4,SR1 ;SECOND A/D? 

5552 B54 001437 BEQ ies, 

5553 0274 060300 ADD R3 RO, ;UPDATE JOB STORAGE ARE POINTER. 

5554 7440 012710 oo0012 MOV #12, ( :MODE WORD-START A/D. 

555s 7444 012760 O00Si2 oo0002 MOV Hat ie ?TAKE 512 SAMPLES 

5556 Oe74Se 012760 OS5536 000004 MOV a Bo 

5557 027460 005070 O00004 CLR a4 ;CLEAR USW 


Jle 
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DRLPA.P T47 *TEST THAT MULTI JOBS CAN BE STARTED AND RUN SEQ 0152 
5558 027464 152760 o00200 000007 BISB #B1T7,7(0) ; BUFFER. OVERRUN NOT FATAL, ONE BUFFER. 
5553 027472 012760 OS624%6 000010 MOV #BUFFO, 10(0) :SET BUFFER 
5560 7500 01°760 000010 o00054 MOV #10,54'C) SET BELAY BEFORE START. 

5561 7506 012760 0004 000056 MOV #420, 56(0) 

5562 7514 012760 OO0016 000060 MOV #16,60(0) ;SAMPLE 14 CHANNELS. 

5563 Oe7S22 Ole76C 000010 oa000be MOV #10°62(0) :SET SAMPLE RATE. 

peed 027530 005237 001124 INC $GDLAT 

5566 027534 6S: 

556 

BdbB ; 7-SDRM- 

5570 Oe 032737 oO00040 001562 BIT #B1TS,SR1 ;/THIS DRLIK #2 SELECTED? 
5571 Ge 42 144 BEQ 65$ 

5572 7544 4308 ADD R3,RO ;/UPDAT JOB STORAGE AREA POINTER. 
5573 Oe7546 012710 o00432 MOV #432, (0) /SET 170 START, MULTI-USER, INPUT SINGLE CHAN. 
5574 75 12760 000256 o0000e MOV #256'2(0) WORD COUNT 

5575 7 127 4 gogo0' MOV #JOB4U,4(0) 

5576 1 00004 MOV #0, 04(0) ;/7CLEAR USW 

5577 74 012760 000006 MOV #0'6(0) 

2278 760 1 oe 000010 nov aBUFFe, 10¢0) ;/SET BUFFER ADDR. 

5580 7614 Lied INC $GDDAT ;RECORD THIS JOB 

5581 7 012760 1 oS4 MOV #100,54(0) : DELAY BEF ORE START. 

pee 76 012760 000001 oo00S6 MOV #2-1'56(0) :7SELECT CHAN 

5 76 012760 000001 O00060 MOV #1,60(0) SAMPLING” ONLY” ONE CHAN. 
5e84 027642 012760 O00001 o0006e2 MOV #1'/62(0) :/SAMPLE RATE 

5586 027650 65S: 

5587 

2588 ; 7-SDRM- 

5590 76 032737 o00200 001562 BIT #B1T7,SR1 ;/THIS DRI1K #3 SELECTED? 
5591 76 14 BEQ 66S 

5S 060. ADD R3,RO ;/UPDAT JOB STORAGE AREA POINTER 
5S be? 01 71 MOV #432, (0) /SET 170 START, MULTI-USER, INPUT SINGLE CHAN. 
5594 1 oo0002 MOV #256' 2(0) + ORD COUNT 

5595 Ge7674 01 S772 OO0004 MOV #JOBSU, 4(0) 

ss Og 08 o 7 0004 MOV 40, a4(0) ;/CLEAR USW 

559 771 127 006 MOV (0) 

5598 027716 Ole7 060252 000010 MOV aBUFF 2, 100) ;/SET BUFFER ADOR. 

5599 0277 G05060 000012 CLR 12(0) 

5600 77 0082 001124 INC $GDDAT ;RECORD THIS JOB 

5601 7734 Ole 60 100 gog0s4 MOV #100, 54(0) : DELAY FORE START. 

5602 7742 Ole7 002 oo00056 MOV #3-1'56(0) ?/SELECT C 

5603 027750 012760 O00001 oO00060 MOV #1,60(0) : /SAMPL ING ONLY ONE CHAN. 
36 027756 Ole760 O00001 oX0006e MOV #1'62(0) :/SAMPLE RATE 

5606 027764 66S: 

5607 

5608 ; 7-SDRM- 

5610 027764 032737 OO0400 O01S62 BIT #B17T8,SR1 ;/THIS DRLIK #4 SELECTED? 
5611 027772 Ool44e BEQ 67$ 
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DORLPA.P11 *TEST THAT MULTI JOBS CAN BE STARTED AND RUN SEQ O153 
S612 027774 060300 ADD R3,RO ;/UPDAT JOB STORAGE AREA POINTER 
5613 027776 O1e716 000432 MOV #432, (0) :/SET 170 ST ART, MULTI-USER, INPUT SINGLE CHAN. 
5614 0127 000256 oo0002 MOV #256'2(0) :7WORD COUNT 
$615 03001 bie? 110 000004 MOV sJOBEU,4(0) 
5616 001 127 iat 000004 MOV #0, 04(0) ;/CLEAR USW 
5617 127 000006 MOV #0'6(0) 
2618 7 000010 MOV sBUFF2, 10(0) ;/SET BUFFER ADDR. 
ee 0 4 3 12 CAC ges baT ;RECORD THIS JOB 
eesy 83050 pO 35e0 rept o000S4 MOV #100, 54(0) :DELAY BEFORE START. 
5622 930056 0-37 oo00ss MOV #4-1'56(0) ;/SELECT CHAN & 
5623 4 0127 01 o00060 MOV #1,60(0) : /SAMPL ING ONLY ONE CHAN. 
pees 030072 012760 000001 o0006e MOV #1,62(0) :/SAMPLE RATE 
5626 030100 67S: 
5607 
5628 ; 7-SDRM- 
5630 030100 001562 BIT #B1T9,SR1 ;/THIS DRI1K #5 SELECTED? 
5631 030106 BEQ 68S 
5632 930119 ADD R3,RO ;/UPDAT JOB STORAGE AREA POINTER. 
5633 11 MOV #432, (0) /SET 170 START, MULTI-USER, INPUT SINGLE CHAN. 
5634 930116 ooo002 MOV #256/2(0) ORD COUNT 
5635 124 000004 MOV #JOB7U,4(0) 
56. 930138 900004 MOV #0, 940) ;/CLEAR USW 
56 1 000006 MOV #0°6(0) 
3638 030146 000010 nov aBUFFe, 10(0) ;/SET BUFFER ADDR. 
5640 30160 INC $GDDAT ;RECORD THIS JOB 
5641 164 ooo0s4 MOV #100,54(0) ‘DELAY BEFORE START 
S642 03017 000056 MOV #5-1'56(0) ;/SELECT C 
5643 0302 000060 MOV #1,60(0) :/SAMPLING ONLY ONE CHAN 
Bae 030206 000062 MOV #1°62(0) :/SAMPLE RATE 
Boe 030214 68S: 
5648 030214 004737 036026 JSR PC, FLASH ;FLASH WILL START JOBS 
5649 !AND REPORT ERRORS,WAIT TILL DONE. 
B6S0 030220 20S: 
S6S2 ; = REKKKKRREKRERE EERE RE RRR MRR A RRR ARA RARER RARER RRRA KERR RRKKLKE 
epey ; ATE T SO *#HIGH SPEED A/D SAMPLE TEST (DEDICATED MODE,SPECIAL TEST 
5655 : IN THIS TEST WILL TAKE A/D SAMPLES AS FAST AS WE C 
5656 1 THIS TEST REQUIRES MEMORY THAN THE REST SO UPON ENTRY 
5657 1 i WE WILL CHECK TO MAKE THAT te HAVE 20K MEMORY . 
5658 1 i ALSO DEDICATE MODE MICRO-CODE MUST BE IN THE KMC. 
5659 «a MUST HAVE TWO A/D S ON THE 170 BUSS BOTH HAVEING A GS036 
5660 1 WRAP-ARROUND MODULE INST BLLED AND NFORMED TO PROGRAM VIA SRe. 
5661 :# IF ALL REQIREMEN ARE MEN ILL DO THIS TEST AND TAKE 
pobe 3 SAMPLES AT A RATE OF APP. iso" KILOHERTZ. 
S664 + LHR E EERE RR RRR KRRRRARREREARAAKRARAAAAARAARAREARE 


5665 030220 oo0004 +éTS0: SCOPE 
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DRLPA.P TSO *HIGH SPEED A/D SAMPLE TEST (DEDICATED MODE, SPECIAL TESt - SEQ O1S4 
S666 
5667 030222 122737 000104 001772 CMPB #’D, SVERSN sRUNNING DEDICATED MODE U-CODE? 
56 1914 BN ETD NO- THEN EXIT. 
B66 e737 o00020 001564 BIT ueIT4, SRe iS CON ND A/D WITH WRAPARROUND MODULE? 
3671 030242 012737 030262 000004 MOV HETOF , 04 CET FOR TIMEOUT IF NOT ENOUGH CORE. 
2655 Bapseq Boevs> Brood $f 858 n000 A008, MEMORY. 
5674 030260 000407 BR 1$ :GO TO START OF _TEST.IF NOT ENOuGH MEMORY 
3675 :WE WOULD HAVE TRAPPED. 
Be os 737 ooo0004 —s MOV #6, 084 RESTORE LOC 4 
bers 630875 O18706 98 MOV aetack, SP : 
IMP 208 
1$ MOV #6, 084 
MOV #503, KWT+2 ;START CLOCK AT RATE IMHZ. ~ 
MOV 8-13" , KWT+4 tINTR. EVERY 13 USEC. 
MOV #J0B0 
MOV eBITiL!B1TS!BITS!BIT1, (0) -START WORD. 
MOV #1000. ,2(0) : PUTER. SIZE 
MOV aJ *4(0) USW 
CLR a4(0) 
MOV #70000, 10(0) ext UP BUFFER ADDRS. 
MOV #70000, 14(0) 
ADD #1000. ; 14(0) 
MOV #70000, 20(0) 
ADD #2000. '20(0) 
MOVB #2,7(0) 
MOVB #100. 540) DELAY BEFORE START. 
MOVB #1.,60(0) NUMBER OF CHANS. 
MOVB #2. NU 
MOV #1. 62(0) Tress BETWEEN SAMPLES. 
MOV #400, 56(0) :START CHO, INC= 
MOV #1, SCDDAT :ONE JO 
JSR PC’ FLASH :D0 IT 
INC FEPOR ;LOOK AT ADLIK #1 
01 MOV #LIST12,R3 
1 2s: MOV (3) CHANS 
1 MOV (3)4, CHANF 
1 MOV (3)+’ AVEXP 
5709 03051 016337 034512 MOV (3)+’ TOLER 
5710 O30516 O1e7 070000 MOV #70000, R1 
S711 030526 13737 034474 oO34466 MOV CHANS, CHAN 
ev ie 0 B43335 034160 JSR PC,SPEP 
5714 030534 012703 055036 MOV #LIST12,R3 ;LOOK AT ADIIK #2 
5715 930840 Ot F499 034474 MOV (3), CHANS 
5716 S44 012337 034476 MOV (3)4, CHANF 
5717 0305 012337 034514 MOV (3)+) AVEXP 
5718 030554 012337 O34Sile MOV (3)+' TOLER 
5719 030560 012701 070002 MOV #70002, Ri 
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b388%2 


030576 
030576 


030576 


030716 
030716 


030722 
030724 
030730 


TSO 


Bba737 


000004 


b08637 
005037 


122737 
sity 
104401 
000402 


ooo40s 


104401 
000402 


104401 
000405 


013746 
10440S 


104401 
000411 
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#HIGH SPEED A/D 


834160 


001102 
001160 
001202 
100000 


000104 
030656 


030672 


030704 


001202 


030732 


034466 


001202 


001772 
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SAMPLE TEST (DEDICATED MODE,SPECIAL TEST 


MOV CHANS , CHAN 
JSR PC, SPEP 


20s: 


ETEST: 

jj RE AREER RARER RARE REALL R REAR RARE EE 
*&TESt Sl ND STs 

© > RGR RRR RRR RRR MRR RRR KRM RK KARR E RRA RRR RHA RRA AAKAES 
tSTS1: SCOPE 

.SBTTL END OF PASS ROUTINE 


gy HME MEME EME HE A He HE HE HE HE HME HE HEH HE HE HE HE HE HE HE HE He HE HA ERE ERK LENS 
: INCREMENT THE PASS NUMBER ($PASS) 

:*IF THERES A MONITOR GO TO IT 

:*IF THERE ISN’T JUMP TO RSTART 


SEOP: 
NOP 
CLR STSTNM ;;ZERO THE TEST NUMBER 
CLR $TIMES ;;ZERO THE NUMBER OF ITERATIONS 
INC $PASS ;; INCREMENT THE PASS NUMBER 
BIE $1, 20000, SPRSS ;;DON’T ALLOW A NEG. NUMBER 
EC (PC)+ ; ; LOOP? 
SEOpCT: .WORD 
BGT $SDOAGN ;;YES 
MOV (PC)+,a(PC)+ ;;RESTORE COUNTER 
SENDCT: .WORD 1 
SEOPCT 


sv -ENDPAS- 
CMPB 7,0. Sane 


BN 

PUPE 65S 3; TYPE ASCIZ STRING 

BR 4$ ;;GET OVER THE ASCIZ 
Ege: -ASCIZ <200>s8D-# 


* BR 2s 
: TYPE 67% ;; TYPE ASCIZ STRING 
BR 663 :iGET OVER ASCIZ 
-:67$: .ASCIZ <200>#M-# 
ut 
: TYPE 69S ;; TYPE ASCIZ STRING 


BR 8s ;;GET OVER THE ASCIZ 
;69$: .ASCIZ #END PASS & 


bas: 
MOV $SPASS, -(SP) ;;SAVE SPASS FOR TYPEOUT 
TYPDS ;; TYPE PASS NUMBER 


TYPE 71 ti TYPE ASCIZ STRING 
BR 0§ PIGET OVER THE ASCIZ 
:;71$: .ASCIZ # ; TOTAL ERRORS’ & 


GO TYPE--DECIMAL ASCII WITH SIGN 


SEQ 0155 


Nle 
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ORLPA.P11 END OF PASS ROUTINE SEQ 0156 
5774 030754 70$: 
5775S 030754 013746 001776 MOV ERCNT, -(SP) ;;SAVE ERCNT FOR TYPEOUT 
5776 030760 1044 TYPDS :;GO_TYPE--DECIMAL ASCII WITH SIGN 
5777 930 013700 oooo4e SGET42: MOV as42,RO ;;GET MONITOR ADDRESS 
5778 7 1405 BEQ $SDOAgN ;;BRANCH_ IF NO MONITOR 
5779 0307 oo000s RESET ;;CLEAR THE WORLD 
5780 772 004710 SENDAD: JSR PC, «RO) :;GO TO MONITOR 
5781 030774 O00240 NOP ;;SAVE ROOM 
5782 030776 O00e40 NOP 33 
$783 031000 Oo00240 NOP ;;ACTIL 
$784 031002 SDOAgN: 
5785 031002 000137 IMP a(PC)+ ; ; RETURN 
5786 031004 003500 SRTNAD: .WORD RSTART 
$787 031006 377 377 000 SENULL: .BYTE -1,-1,0 ;;NULL CHARACTER STRING 
5788 031012 EVEN 
5789 
5730 
tet .SBTTL BINARY TO OCTAL (ASCII) AND TYPE 
$733 o RRMA ARREARS RAR RAR ARRAN ERR AAR A RRA KARA KARL A AAA RRARERAREEE 
5794 tkTHIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
5795 :*OCTAL (ASCII) NUMBER_AND TYPE IT. 
2736 j #$TYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
5798 + MOV NUM, -(SP) ;;NUMBER TO BE TYPED 
5799 2% TYPOS 54 CALL FOR TYPEOUT 
5800 x BYTE N ;;N=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
5801 :% -BYTE MM ;;M=1 OR 0 
5802 1% ;;1=TYPE LEADING ZEROS 
2803 iF } O=SUPPRESS LEADING ZEROS 
5805 :¥$TYPON----ENTER HERE TO tYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
5806 :*STYPOS OR STYPOC 
5807 ; *CALL: 
5808 $x Mov NUM, ~ (SP) ;;NUMBER TO BE TYPED 
2803 is YPON ;;CALL FOR TYPEOUT 
2811 | #STYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
5813 S MOV NUM, -(SP) ;;NUMBER TO BE TYPED 
egi4 x TYPOC ;;CALL FOR TYPEOUT 
5816 031012 017646 000000 STYPOS: MOV a(SP),-(SP) ;;PICKUP_THE MODE 
$817 031016 116637 000001 031235 MOVB 1(SP)) SOF ILL ;LOAD ZERO FILL SWITCH 
$818 031024 112637 031237 MOVB (SP)+’SOMoDE+1 ;;NUMBER OF DIGITS TO TYPE 
5819 031030 062716 aoe ADD #2, (SP) ;;ADJUST RETURN ADDRESS 
S820 031034 009406 BR STYPON 
$8e1 031036 112737 000001 031235 STYpOC: MOVB #1, SOF ILL +3 SET THE ZERO FILL SWITCH 
S822 O31044 112737 000006 031237 MOVB #6, SOMoDE+1 SET FOR SIX(6) DIGITS 
$823 031052 112737 OO0000S 031234 S$TYPON: MOVB #5, $0CnT : SET THE ITERATION COUNT 
S824 031060 010346 MOV R3,-(SP) ;SAVE R3 
5825 031062 O10446 MOV RY) -(SP) i SAVE Ro 
S826 031064 O10546 MOV RS, -(SP) ;SAVE_RS 
S827 031066 113704 031237 MOVB SOMODE +1, R4 ::GET THE NUMBER OF DIGITS TO TYPE 
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DRLPA.P11 BINARY TO OCTAL (ASCII) AND TYPE SEQ 0157 
4 NEG RY 
2856 931055 OOS 704 ooco06 ADD #6,R4 ;;SUBTRACT IT FOR MAX. ALLOWED 
5830 1109 110437 031236 MOVB R4’ SOMODE 3; T FOR 
5831 O31 11 031235 MOVB SOFILL,RY *:GET THE ZERO FILL SWITCH 
S832 031110 616605 000012 MOV 12(SP);RS ::PICKUP THE INPUT NUMBER 
1114 CLR R23 ?;CLEAR THE OUTPUT WORD 

5834 03111 eat 1$: ROL RS ::ROTATE MSB INTO “C” < 
Ba 1126 006105 2s BOL ze 5 aE e Tte DIGIT 
5837 O31 158 ipe ao eo. = 
2839 031158 nyt MOV R5S,R3 
5840 11 006103 3S: ROL R3 ;;GET LSB OF THIS DIGIT 
5841 031134 105337 031236 DECB SOMODE ::TYPE THIS DIGIT? 
5a4e O31149 109018 BPL 7§ ::BR_IF_NO 
5843 114 2703 177770 BIC #177770,R3 ::GET RID OF JUNK 
S844 O31 146 1002 BNE 4g :: TEST FOR 5 
584s O311 704 TST RY ::SUPPRESS THIS 0? 
58 1152 001403 BEQ S$ ::BR IF YES 
5847 031154 o0S204 4S: INC RY ::DON’ T_ SUPPRESS ANYMORE 0’S 
5848 031156 052703 oo00060 BIS #’0,R3 ::MAKE THIS DIGIT ASCII 
5849 G3i1 O03 000040 S$: BIS #’ °R3 ::MAKE ASCII IF NOT ALREADY 
58S0 1168 116337 031232 MOVB R3,8$ ?:SAVE FOR TYPING 
58s 11 109401 031232 TYPE ag ::G0 TYPE THIS DIGIT 

031176 7 031234 7$: DECB $OCNT ::COUNT BY 1 
sey leo Goer ae Hes He bone T0 0° 
2855 1 INC RY j | INSURE LAST DIGIT ISN’T A BLANK 

O31 1 4 BR 2s :?G0 THE LAST DIGIT 
5857 l2i2 O1260S 6S: MOV (SP)+,RS RESTORE RS 
Bees Oaisie Ofseod NOV CSP 33°RS tIRESTORE Rd 
Bea 031220 BLEEEE oooo02 oo0c04 MOV 2(SP)'4(SP) +E? BF ack FOR RETURNING 
5861 O3l2ee¢6 012616 MOV (SP)+? (SP) 
S862 031230 000002 RTI ; ; RETURN 
5863 031232 000 QS: BYTE O jj STORAGE FOR ASCII DIGIT 
5864 031233 000 “BYTE O ?: TERMINATOR FOR TYPE ROUTINE 
5865 031234 000 SOCNT: :BYTE 0 ::O0CTAL DIGIT COUNTER 
See? 31536 OOOnoD SOMODE: “HORD 0 ti RENGER-OF DIGITS TO TYPE 
e868 .SBTTL CONVERT BINARY TO pecrmal’ AND TYPE ROUT INE 
aa SRE MAO NTINE ie USED TO CHANGE A 16-BIT BINARY NUMBER TO A S-DIGIT 
2675 TRUMSER PECEDRG OED NORSEe EO gpuce Or’ aPRinve SfaQ"wite GE" yee 
5874 !¥BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
2875 j XREPLACED WITH SPACES. 
5877 1% * MoV NUM, -(SP) ;;PUT_THE BINARY NUMBER ON THE STACK 
2878 1 i TYPDS ;7GO TO THE ROUTINE 
5880 031240 STYPDS: 
5881 031240 o10046 MOV RO, -(SP) ;;PUSH RO ON STACK 


oe oe 
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5935 .SBTTL ERROR HANDLER ROUTINE 


| 
DRLPA.P11 CONVERT BINARY TO DECIMAL AND TYPE ROUTINE SEQ O1Se8 
S882 031242 010146 Mov RL, -( SP) ;;PUSH RI ON STACK | 
sees B31 O1gSHe MOV R3,-(SP?) tibuen B BN at ReK | 
i 1 nov RS, 5 (SP) oe :?PUSH RS ON STACK jones 
re Bes ties 8 ae aaa eae 
5889 031264 OooS40S NEG RS 3: THe BINARY R POS. 
5890 031266 112766 o0005S 000001 a nove a”, 1¢SP) } MAKE T a II U NEG. 
egg4 R31852 031454 : St Spek R3 11 ile Hie tig Boi NtEn 
5893 93130e 112723 oo00040 a nove a. , (RA)+ anit HE FIRST furees TO A BLANK 
‘ $ 
28de 03131 1 031444 MOV SOTBL (RO), Ri ii SLbae 
2838 p31 18 1 108 3S: 3uB Rl, RS ORY THIS BCD ARIGIT 
2838 132 niga INC Re ?? INCREASE THE BCD DIGIT BY 1 
5 1 10S 4S: ADD R1,RS ADD BACK THE CONSTANT 
Bane 031358 porons ae § REE TROUGH fFoO 
5304 5 : 7 rste im a DOInG LEADING 0’S? 
e 1 106316 Ss: ASLB ( 
5 ' i y 102003 O01 177777 SSve er P) .-1(R3) pe T 
Bi 631355 bee70s 09060 6S: BIS ae Re ek HE wee Bigir ASCII 
031354 40 73: BIS #’ IF NOT ALREADY A DIGIT 
2319 031360 }i0ee3 nove Ret tR3)+ j ;PUL_ THIS 4 HBRBCTER tN THE OUTPUT BUFFER 
1 1364 7 010 CMP R #10 5; CHECK E INDEX 
2gi§ 931384 erat anes BLT Ry $368 8 ue NER raat DIGI 
Baie Oalaed | OT aene Sov «RS R2 5 oer THE 
paiB 0313 ogres BR 63° i 0 ASCII 
pal? O31 409 : 05726 Qs: TSTe (SP + sas THE LSD THE FIRST NON-ZERO? 
5S 1404 1 77777 «17777 MOV: -1(SP),-2(R3) FOR TYPING 
530 Baiui3 108873 . . . 9S: tok CASS ‘ Hs nS TERRIRATOR 
Sos 31416 Of NOV CSP DSIRE biEOp STACK INTO Ra 
2g5§ 531438 BiSeB3 MOV (SP)+; Poe 2y K INTO Re 
5335 O31es 01300 Moy. «CSP aa" R SiBOe Stack INTO AO 
ze 14 ret 1 031454 TYPE Spark He PYRE THE NUMBER 
5927 031432 016666 O00002 oj0004 MOV 2(SP),4(SP) ::ADJUST THE STACK 
E 144g MOV (SP)+? (SP) 
144 RTI ;;RETURN TO USER 
53 1444 S$DTBL: 10000. 
5931 031446 001750 1000. 
Ba33 pales pnobie ibe 
5934 B3i4ed 000004 S$DBLK: .BLKW 
| 
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DRLPA.P11 ERROR HANDLER ROUTINE SEQ 0159 
2338 5 HERE ME AE HE HE EAE HE HE He HEE HE HEE AE HE REE EERE EERE 
5938 THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 

é ieuage SN] RoTeR AND THE ADDRESS OF THE ERROR CALL 
5941 ;*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
5942 :¥SW1S=1 HALT i 
2aqa + Wi det NAIBzT TYPTOUT 
Baus j XSUOS=1 LOOP ON ERROR 
o3uz : ERROR N ; ;ERROR=EMT AND N=ERROR ITEM NUMBER 
2acg BStued 104407 “me ; TEST FOR ¢ IN SOFT-SWR 
4 3 7$: INC RFLG i RROR FLAG 
Base Osiu%e dbr9%S tO geo Bow TC LET THE FLAG GO TO ZERO 
5953 031474 013777 001102 147440 MOV STSTNM, IDISPLAY ; SPLAY TEST NUMBER AND ERROR FLAG 
Bes ret 144s 002006 147430 BIT ate 0; JSWR 3} BELL OR? 
5 Sle 1 1 001164 TYPE : TRING 
5957 031516 005237 OO011le 1S: INC ; : COUNT HE NUMBER OF ERRORS 
5958 031522 011637 001116 coal nov aa a ::GET ADDRESS OF ERROR INSTRUCTION 
ae 
2328 031858 165737 14 001114 nove ssefaecs $r7ene ;;STRIP_AND SAVE THE ERROR ITEM CODE 
5361 1b4e Ge777 020000 147370 BIT 5 SKIP TYPEOUT IF SET 
23e5 031862 04737 031 eid es +86 TO YSERC ERROR ROUTINE 
poet O31 104401 001171 ae TYPE =—s_ , SCRL’ 
seep GBs igfzge 00001 oman “°° gaps aeprenv. sow RU AS Ala herg 
03157 3737 114 031604 MOVB T 21S 2: Set RROR NUMBER 
2368 B31 275 bha535 cere Hes i eneyG iRe t eMart RRR O APT 
2370 O31604 000 21S: BYTE 
5972 1B08 225: BR O2g ; ;APT_ERROR LOOP 
5973 1610 777 147324 os: TST aSWR :?HALT ON ERROR 
sare Balele a, HTRGUT On Eatoun™ 
5976 031620 407 CKSWR :; TEST FOR C IN SOFT-SWR 
5977 O i z 001000 147310 3S: BIT #81709, aR ‘ibe FON ERROR WITCH SET? 
2958 B31 P38 vera 001110 MOV SLPERR, (SP) i BOGE RETURN FOR LOOPING 
5380 031638 005737 001162 4S: TST SESCAPE : CHECK FOR AN ESCAPE ADDRESS 
532 31649 erat 001162 ~ MOV SEscAPE, (SP) + BODE RETURN ADDRESS FOR ESCAPE 
5984 031650 005237 001776 10S: INC ERCNT 
5985 031654 001775 BEQ 10$ 
5986 031656 000002 RTI 
2287 .SBTTL ERROR MESSAGE TYPEOUT ROUTINE 


5989 5 5 MEET ME HE HEHE EE HE EE HE HE HEE EE EE KERR RE EEE LEER EE 
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; ¥THIS ROUTINE USES THE “ITEM CONT BYTE” et rene) TO pe TEM WHICH 
#ERROR IS TO BE REPORTED. IT THEN OBTAINS, FROM THE “ERROR — (SERRTB). 
t ¥AND REPORTS THE APPROPRIATE INFORMATION BONCERNING THE ERROR 


SERRTYP: 
T 


YPE S$CRLF ; CARRIAGE RETURN” & “LINE FEED” 
MOV RO, -(SP) ::SAVE RO 
CLR RO’ ::PICKUP THE ITEM INDEX 
BISB J#SITEMB, RO 
BNE 1$ ;;IF_ITEM NUMBER 1s ZERO, JUST 
i} TYPE THE PC OF THE ERROR 
MOV SERRPC, -(SP) ::SAVE SERRPC FOR TYPEOUT 
+ cre AD S 
TYPOC - $360, TYPE--OCTAL ASCIIC(ALL DIGITS) 
1S: DEC RO i tABJUST THE INDEX SO THAT IT WILL 
ASL RO He WORK FOR THE ERROR TABLE 
ASL RO 
ASL RO 
ADD #SERrTB,RO ;;FORM T POINTER 
MOV (RO)+,2$ ;;PICKUP * eens: POINTER 
BEQ 3$ +: SKIP TYPEQU F NO POINTER 
TYPE i30 - R i? 
2S: .WORD 0 73"E OR Hee NTE GOES. HERE 
TYPE SCRLF >; "CARR URN” & “LINE F 
3S: MOV tRO)+,4S :;PICKUP ™ ret HERDER” BOTRTERS 
BEQ S$ ::SKIP T T I fi 
TYPE i: TY THE "DAT R” 
4$: .WORD 0 :: "DATA R” POINTER GOES H 
TYPE SCRLF +; "CARRI TURN” & “LINE FEED” 
SS: MOV tRO),RO ::PICKUP “DATA TABLE” POINTER 
BNE 7$ ::GO TYPE THE DATA 
6S: MOV (S5P)+,RO ? RESTORE RO 
TYPE SCRLF :: "CARRIAGE RETURN” & “LINE FEED” 
= RTS Pc : } RETURN 
MOV a(RO)+,-(SP) ;;SAVE @(RO)+ FOR TYPEOU 
TYPOC ::G0 TYPE--OCTAL ASCTT CALL DIGITS) 
TST (RO) ;31S THERE ANOTHER NUMBER? 
BEQ C3 ::BR I 
TYPE aS :: TYPE TWO(2) SPACES 
BR 2¢ > ;LOOP 
8S: -BSCIZ a oe ::TWO(2) SPACES 


EVEN 
-SBTTL SCOPE HANDLER ROUTINE 


j SOSUUSEREUSRSSOSRERESERERSASSSSR SR ERNESRERROREDERDESESRB ESSE ESE 
 ATHIS ROUT L CONTROLS THE LQORING OF OF SUBTESTS. IT WILL INCREMENT 
; #AND Loe tT TESt Magers STNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
; XAND T OR FLAG (SERFLG) INTO DISPLAY< 15: 08> 
;*THE SWITCH OPTIONS provigeo 3Y THIS ROUTIN® ARE: 


; *#SW14=1 LOOP ON TESt 
;*SW11l=1 INHIBIT ITERATIONS 
; *SWOS=1 LOOP ON ERROR 


SEQ 0160 
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ORLPA.P11 SCOPE HANDLER ROUTINE SEQ 0161 
6044 ; #SWO8=1 LOOP ON TEST IN SWR<7:0> 
5604S  *CALL 
b046 : SCOPE ; ;SCOPE=IOT 
Eanes 14 $SCOPE: 
B049 14 104407 CKSHR ;;TEST FOR CHANGE IN SOFT-SWR 
6051 38028 032777 o4o000 147112 1S: BIT aeiT14, , aSWR LOOP ON. PRESENT TEST? 
ee3 #eeeeSTART OF CODE FOR THE XOR tesTeReeste 
b054 032030 000416 &xTSTR: BR 65 i ING ON ON, THE © XOR™ TESTER CHANGE 
6058 032032 013746 990008 cmeibis MoV a5 o¥ER -(SP) ey at route NTS OF THE ERROR VECTOR 
eee Ge BCS deca Ser ee 
0 i g 000004 nov (Sha GERRVEC 3 st THE E OR VECTOR 
B06) 036056 Deebeb SS: CMP (SP)+, (SP)+ Clean THE St aK TESTER A TIME OUT 
cose eos Bagazs °° Be SgrysseHenive fi Mear Oh Tie PRESENT TESh 
6064 032065 6S:; #8888END OF CODE FOR THE nat + fer Rotana 
606S 932777 000400 147044 BIT #81 TOS, ISWR 3 LOOP ON, ON SPEC. TEST? 
606 76 to? 797 147036 001102 CMPB SWR, STS*NM :iBn tee RIGHT TEST? SWR<7:0> 
6068 104 001465 3h VER :BR_IF YES. 
606 1 1057 001103 2s: TSTB ERFLG i HAS AN OR OCCURRED? 
6070 O3ell2 001421 BEQ 3$ ::BR IF_NO 
6071 032114 163732 001115 001103 cHPe SERMAX, SERFLG $s BEX, , ERRORS FOR THIS TESt OCCURRED? 
6073 O3e1e4 032777 001000 147006 BIT #81709, JSWR ::LOOP ON ERROR? 
6074 132 001404 BEQ 4§ ::BR IF NO 
6075 032134 013737 001110 OO01106 73S: Mov SLPERR, SLPADR ::SET LOOP ADDRESS TO LAST SCOPE 
ated pastas rteseia 001103 4S: CLRB SERFLG ;;ZERO THE ERROR FLAG 
6078 032159 005037 001160 cLR STIMES ; CLEAR THE NUMBER OF ITERATIONS TO MAKE 
Eee 038156 poo748 004000 146754 3S: BIT #B1T11,aSWR i Fete PTERAIT TONS? 
6081 164 001011 BNE i$ 5 BB I S 
6082 032166 005737 o01202 TST SPASS 5 IF FI S OF 
6083 1 1406 BEQ 1$ He NHTE 7 STERRTIONS 
6084 174 001104 INC SICNT : ? INCRE 
608S a 37 001160 001104 CHE STINES, , SICNT i CHECK WYTeRaT TON REGU RATIONS MADE 
rad 210 0127 000001 0O01104 1S: MOV #1,$ICNT ies IF : HE ITERATION COUNTER 
6088 O3ee16 013737 Geers 001160 MOV SMXCNT,STIMES 3;;SET R OF ALTERATIONS To DO 
6089 i i102 $SVLAD: INCB STSTNM *:COUNT TEST 
6090 932230 113737 001102 001200 MOVB STSTNM,STESTN ;;SET TEST NUMBER IN APT MAILBOX 
6091 236 011637 001106 MOV (SP), SLPADR i} SAVE Sc LOOP ADDRES 
603¢ 24, O11 3 001110 MOV (SP) i :: SAVE ERROR LOOP ADDRESS 
60 Sue 7 001162 CLR SESCA ::CLEAR THE ESCAPE FROM ERROR ADDRESS 
6094 O322S2 112737 OO000!1 001115 MOVB #1. SERMAX ::ONLY ALLOW ONE(1) ERROR ON NEXT TESt 
6095 O32260 013777 001102 146654 SOVER: MOV STSTNM, @DISPLAY ::DISPLAY TEST NUMBER 
032266 013716 001106 MOV $LPADR; (SP) :!FUDGE RETURN ADDRESS 
6097 O3e272 o00002 RTI tiFIXES PS 
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SMXCNT: ;;MAX. NUMBER OF ITERATIONS 


10 
SBTTL TTY INP'IT ROUTINE 
= 3 SE SE SE SE SE 26 Ae SE a SE a Se A a a a a HE 


* ENABL 


H = REKKRRKKKRREERREARR ARERR ARRARKA AAA ARARARARARKRAKKKAKRARAAAAAAAAAAAEE 
 &SOF TW TWARE SHITCH REGISTER CHANGE ROUTINE. 

s SOUT NS I NTERED TRAP HANDLER WILL 

“SERVICE THE TESt FOR OF TWARE but TeH REGISTER TRAP CALL 
‘WHEN OPERATING IN TTY F DE. 

$CKSWR: CMP sSUREG ji 1S THE eto SELECTED? 


taf at R 
STB KS ::CHAR THERE? 
BPL 15$ ::IF NO, DON’T WAIT AROUND 
MOVB aSTKB, -(SP) ; } SAVE THE C 
BIC #0177, (SP) Ht IP-OFF THE ASCII 
CMP 7, (SP3+ ‘IS ITA SONTR lL G? 
aa 138 0 #1 BR RE TRON NG “FR auto MODE? 
i 
BEQ § ; are AY vin 
TYPE , SCNTLG CHO T THE CONTROL-G (1G) 
$GTsWR: TYPE NT CONTENTS 
MOV SWREG, -(SP) ave EG FOR TYPEOUT 
TYPOC 3350 SRG FOR ASCIICALL DIGITS) 
TYPE , SMNEW :PROMPT FOR NEW SWR 
19$: CLR ~(SP) CLEAR COUNTER 
CLR -(5P) +? THE 
7S: TSTB asTKS : !CHAR HE 
BPL 3 ::IF NOT TRY "AGAIN 
MOVB STKB,-(S ss PICK UP CHAR 
BIC ace, CaP MAKE IT 7-BIT ASCII 
QS: CMP (SP), #25 ;;1S IT A_CONTROL-U? 
BNE 10$ 1 Rance 0 
TYPE $CNTLU :YES, ECHO CONTROL-U (tU) 
20S: ADD ke, SP ; ; IGNORE PREVIOUS INPUT 
R 19$ LETS S TRY IT AGAIN 
10S: CMP (SP), #15 ;;I1S IT A, {CR ? 
BNE 163 ; BRANCH F NO 
TST 4 (SP) i YES. Is att THE FIRST CHAR? 
BEQ 115 He H I 
MOV 2(SP),aSWR : SAVE CREM I guia 
11S: ADD #6, SP’ ::CLEAR UP STACK 
14S: TYPE $CRLF $s ECHO <CR> AND <L 
CMPB siNTAG, #1 5 i RES ENA’ TTY KBD INTERRUPTS? 
BNE : BRANCH NOT 
MOV #100, aSTKS Pipe ENABLE TTY KBD INTERRUPTS 


SEG 0162 
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168: 


17S: 


18$: 
. DSABL 


RII 
dap | RSS THERS 
8 18s ” 


CMP (SP), #67 
BGT 
BIC #60, (SP)+ 
2(SP) 

anes 
AetC« 
ASL (SP) 
ENC 2(SP) 

I -2(5P), (SP) 
BR 7 

YPE QUES 
BR 20$ 
LSB 


; ;RETURN 

7s BCH CHAR 
;;CHAR < 0? 
;;BRANCH IF YES 
3; CH >» 7? 
;;BRANCH IF YES 

ED bo FE pSeih 

;;1S THIS THE ST CHAR 
| ANCH IF YES 


33 THE 
3; 1YPE ?<CR><LF> 
;;SIMULATE CONTROL-U 


s REKARRARRAL AKL A RRA RRA ALAA RAE LEAL ALAA RA ELAAAAAALARRARAALARKARELARAAS 


;*#C 

3% ROCHR 

i RETURN HERE 

SRDCHR: MOV (SP),-(SP) 
MOV 4(SP},2(SP) 

1S: TSTB asTKS 
BPL 1$ 
MOVB aSTKB, 4(SP) 
BIC #tC<177> 4(SP) 
CMP 4(SP), #23 
BN 33 

2s: TSTB aSTKS 
BPL es 
MOVB TKB, -(SP) 
BIC aiC177 (SP) 

SP)+, kel 

BNE 
BR 1$ 

3S: CMP 4(SP), #140 
BLT 4g 
CHP 4<SP), #175 
BEC #40,4(SP) 

4g 


st 


*CA 
+ 


ROLIN 
RETURN HERE 


i ATHIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


Ae | 


;;PUSH DOWN THE PC 
;;SAVE THE PS 


TY 
OF JUNK IF ANY 
ONTROL-S? 


i AIT FOR A CHARACTER 
UNTIL ITS THERE 
HARACTER 


C 

5; MAKE IT Z2-BIT ASCII 
:!15 IT A CONTROL-O’ 
jE NOT DISCARD IT 

7315S tT BEPER CASE? 

a5 IF YES 

::I1S IT A SPECIAL CHAR? 


:: BRANCH IF Y 
::MAKE IT UPPER CASE 


;; INPUT A STRING FROM THE T 
;;ADDRESS OF FIRST CHARACTE 


PORE ott GR BeeB* 


FROM THE TTY 
OFF 


H RTI .. ‘AC 
err ri ttt tti titi tiititiiiiitiiiitiititititiittiitiiiiiiirri ie 
j ATHIS ROUTINE WILL INPUT A STRING FROM THE TTY 


TY 
R WILL BE ON THE STACK 





SEQ 0163 
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DRLPA.P11 TTY INPUT ROUTINE SEQ 0164 
6208 ;% ;; TERMINATOR WILL BE A BYTE OF ALL O'S 
62 700 010346 $RDLIN: MOV SP? 3; SAVE R3 
62 032702 012703 033006 1$: MOV RStTyIN. R3 ADDRESS 
6210 ? 2703 033016 es: CMP SSTTYINSS. ,R3 ; }BUFEER FULL? 
6211 O32712 101405 BLOS 4g :;BR IF YE 
bele 714 104410 ROCHR GO READ ONE CHARACTER FROM THE TTY 
6213 7 112613 MOVB (SP)+, (R3) ::GET CHARACTER 
6214 9 ig 713 000177 10$: CMPB #177, (R3) ::IS IT A RUBOUT 
6215 1003 BNE 3 ::SKIP IF NOT 
be16 0327 1oWao1 001170 4$: TYPE SQUES ::; TYPE A_’?? 
bel 7 7 BR 1§ :? CLEAR THE BUFFER AND LOOP 
sels aere ion, SON app. GaN, pont 2 Neenisedpedas 
6220 Rea 133754 000015 CMPB &iS, (R3)+ ;;CHECK FOR RETURN 
esse p35720 ined 77777 aise oF oR) ETE TORN T THE 15) 
B55 p3S526 1 aut 1172 TYPE $LF 3} TYPE A LINE FEED 
224 762 012603 MOV {SP)+,R3 STORE R3 
bees 764 011696 MOV (SP) ,~(SP) ; }ADJUST - THE STACK AND PUT ADDRESS OF THE 
16666 oo00004 oD000e MOV 4(SP}),2(SP) He FIRST ASCII CHARACTER ON IT 

6227 032774 012766 033006 O00004 MOV w$T /iN,4(SP) 
be 933002 00000 RTI ; RETURN 
62 9S: BYTE 0O STORAGE FOR ASCII CHAR. TO tYPE 

30 033005 000 ‘BYTE O :: TERMINATOR 
6231 033006 000010 S$TTYIN: .BLK 8. ; ; RESERVE 8 BYTES FOR TTY INPUT 
6232 93301 052536 oos5015 000 $CNTLU: .ASCIZ /tU/<15><12> :CONTROL “U" 
6233 0 136 006507 OO000l2 S$CNTLG: :ASCIZ /tG/<15><lo> ::CONTROL "G” 

34 9330 905015 0835e3 020122 SMSWR:  .ASCIZ <15><12>/SWR = / 
62 033041 040 047040 OS3SOS SMNEW: .ASCIZ / NEW = / 
6237 033046 036440 Oo0040 
6238 ; . $SB2D 
6239 : . $DB2D 
6240 
bet .SBTTL TYPE ROUTINE 
6243 = RERKKAKEREFRAES : Tey toenreate tte a a 
6244 ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 
6245 !*THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
6246 :#NOTEL: $NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
6247  *NOTEe: Fitts CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
bee j SNOTES: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 
6250 > *¥CALL: 
6251 :*#1) USING A TRAP INSTRUCTION 
bese i TYPE , MESADR ;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
6254 :% TYPE 
6255 1% MESADR 
cee) i 
6258 033052 105737 001157 $TYPE: TSTB STPFLG :;1S THERE A TERMINAL? 
6259 033056 100002 BPL 1$ ::BR IF YES 
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DRL TYPE ROUTINE SEQ 0165 
6260 933069 990000 HALT . ; HALT HERE IF NO TERMINAL 
62 83 4 nant 1$: MOV 23 -(SP? ti Gave RO 
03 0 ponage MOV aetsP) RQ. ::GET ADDRESS OF ASCIZ STRING 

4 122 00001 001214 CMPB SAPTENYV, SENV :;RUNNING IN APT MODE 
6265 0331 001011 BNE 62S ?NO,GO CHECK FOR APT CONSOLE 
pees BS51t8 AoT4as COCO oolels SITB BER TSPOOL,, SENVM 5 SPOR, FF eOE od Otto 
beeg O3311 016039 033122 MOV RO,61$ :; SETUP RESSAGE ADORESS FOR APT 
BeeS 116 7 033444 = JSR PC, SATY3 :: SPOOL 3 5e° APT 
6271 33184 099099 000040 o01215 62S: BITB #APTCSUP, SENVm OBS COR SUPPRESSED 
6272 0331 001003 BNE 60S ::YES,SKIP TYPE OUT 
be73 zi 34 2s: MOVB (RO)+,-(SP) :: PUSH TER TO BE TYPED ONTO STACK 

74 1 BNE 4§ 5788 IF IT ISN’T THE TERMINATOR a 
e576 Oaaiue O1S60B OS: nev «(SP 0, RO Te penal eaal tal tate uses ) 
be77 aoe 066718 oooo02 3S: 80D #2, (SP) ; ; ADJUST RETURN PC 
6279 152 122716 000011 4S: CMPB #HT, (SP) ::BRANCH IF <HT> 
6280 033156 001430 BEQ $ 
6281 160 1ge7 16 000200 cneB #CRLF, (SP) ;;BRANCH IF NOT <CRLF>- 
fen Baise Toucr o_o 1199 A°ba‘no EBL 
6285 033172 001171 $CRLF 
be86 033174 108037 033330 CLRB SCHARCNT ; }CLEAR. CHARACTER, COUNT 
6288 p3350e inet 033264 SS: ISR PC, STYPEC ::G0 TYPE THIS CHARACTER 
6289 033208 1237 6 001156 65: cHPS SFILLC, (SP)+ i418 I TIME FOR FILLER CHARS. ? 
6231 033214 013746 001154 MOV $NULL , -(SP) 5: GET ¥.0F FILLER CHARS. NEEDED 
B54 3ae04 Opetep C0000! oe ae TOES Oe a PED or stack 
629S O03322¢6 004737 033264 ISR PC, STYPEC ::G0 TYPE A NULL 
bese 33e3e 105337 033330 DECB $SCHARCNT :?D0 NOT COUNT AS A COUNT 
be37 33236 000770 BR 7§ : ; LOOP 
be99 ;HORIZONTAL TAB PROCESSOR 
6301 40 112716 oO0040 Qs: MOVB #’ (SP) ;;REPLACE TAB WITH SPACE 
302 p33509 bag49 033264 9s: JSR Pc, $TYPEC :: TYPE A SPACE 
6303 033250 132737 000007 033330 BITB #7, SCHARCNT }:BRANCH IF NOT AT 
6304 033256 001372 BNE 93 >: TAB STOP 
e30e poo784 oe Oti«ia tit OT REXT CHARACTER 
6307 4 105777 145660 STYPEC: rsT8 ase . ::WAIT UNTIL PRINTER IS READY 
£356 033272 116677 oo0002 145652 MOVB 2(SP), aSTPB ;;LOAD CHAR TO BE TYPED INTO DATA REG. 
6310 933300 122766 000015 o00002 cHPS wcR, et SP) j}1S CHARACTER A CARRIAGE RETURN? 
6312 033310 105037 033330 CLRB SCHARCNT ::YES--CLEAR CHARACTER COUNT 
6313 033314 O00406 BR STYPEX :EXIT 


ela —— DRLPA-A 
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1S: CMPB aLF,2(SP) is CHARACTER A LINE FEED? 
BEQ STYPEX :BRANCH_IF Y 
INCB (PC) + ?COUNT THE Char ACTER 
$CHARCNT: .WORD O bay Tee COUNT STORAGE 
STYPEX: RTS PC 


.SBTTL READ AN OCTAL NUMBER FROM THE TTY 


5 GS HE 26 SE JE He 36 HE JE SE SE HE BE EH He HE EH HEH HE HE HE EH HE SE HE HE EH HE SE HE HE HE HE 
i ATHIS ROUTINE ae READ AN OCTA! (ASCII) NUMBER FROM THE TTY AND 


te RDOCT ;READ AN OCTAL NUMBER 
x RETURN HERE LOW ORDER BITS ARE ON TOP OF THE STACK 
7 HIGH ORDER BITS ARE IN SHIOCT 


, PROVIDE SPACE FOR THE 


SRDOCT: ry 


(SP),-(S 
OV 4(SP}, 2° T NUMBER 
MOV RO, -(SP) py RO ON STACK 
MOV R1,-(SP) He R1 ON STACK 
MOV R2;-(SP) ;;PUSH Re ON STA 
1$: RDLIN AN ASCIZ LINE 
MOV (SP)+,RO PIGET ADDRESS a 1ST CHARACTER 
cLR Rl ;;CLEAR DATA WORD 
2s: MOVB (RO)+,-(SP) ;;PICKUP THIS CHARACTER 
BEQ 3$ si1F ZERO GET OUT 
ASL Rl 3; #2 
ROL Re 
ASL R1 534 
ROL Re 
ASL Rl 3; *8 
ROL Re 
BIC #4+C7, (SP) ;;STRIP THE ASCII JUNK 
ADD (SP)4,R1 :;ADD IN THIS DIGIT 
BR 2s ;: LOOP 
3S: TST (SP)+ : G.5BN TERMINATOR FROM STACK 
MOV R1, le(SP) ;SAVE THE RESUL 
MOV Re: $HIOCT 
MOV (SP)+,Re eer STACK INTO Re 
MOV (SP)+'R1 ::POP STACK INTO R 
MOV (SP)+;RO 15 Boe STACK INTO RG 
RTI : RETURN 
SHIOCT: .W 0 ‘HIGH ORDER BITS GO HERE 


ORD 
.SBTTL APT COMMUNICATIONS rourrhé 
1 pee ea eames oy at gt ela 


AT MOV8 #1,$FFLG ;TO REP ORT FATAL ERROR 
Satya: MOVE al, SHFLG rT TYPE A MESSAGE 
SAT YY: MOVB #1,SFFLG ;;TO ONLY REPORT FATAL ERROR 
“MOV RO, -(SP) ;;PUSH RO ON STACK 
MOV Ri’ -(S5P) ::PUSH R1 ON STACK 


SEQ 0166 


13 
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DRLPA.P11 APT COMMUNICATIONS ROUTINE SEQ 0167 
6368 033468 105737 033700 TSTB SHFLG $1 SHOULD TYPE A MESSAGE? 
£376 033474 122737 000001 001214 cneB BAPTENV, SENV } | OPERATING UNDER APT? 
6372 0 3204 132737 000100 001215 B1T8 BQPTSPOOL, , SENVM } SHOULD SPOOL MESSAGES? 
6374 oselg g0 ooo004 MOV 34(SP),RO tIGET Seésage ADOR. 
6375 033520 062766 O00002 oD0004 ADD #2, 4(SP) ;;BUMP RETURN ADDR. 
: i) 

6376 033588 005737 001174 1$ rst SHSGTYPE SEE IF BONE W/ LAST XMISSION? 
cure Geseag (uve, 01z10 os: Yn RARTSSAPO | FROTERS BF PLLRRE 
£328 833248 bgT 556 ; BNE 2s 
6381 033544 163700 001210 SUB $MSGAD , RO ;SUB START OF MESSAGE 
£385 B33228 1 001212 nov Ro, SMSGLGT GET L Sera Th MATL BOX — 
6384 033556 12737 000004 001174 nov 4, * SMSGTYPE :: TELL APT TO TAKE MSG. 
b3ae O33866 1 000004 033612 35: MOV 4(SP) 4S ;;PUT MSG ADDR IN JSR LINKAGE « 
638 74 O62 oo0002 000004 ADD #2,4(SP) BUMP RE TURN ADDRESS 

177778 MOV 177776 -(SP) 3B SH Hu 123776 TACK 

35.48 330 JSR PC, STYPE YPE MA Roe 
6 1 4S: . WORD 
6391 033614 S$: 
4 $737 033702 10$: ists segue $ SHOULD REPORT FATAL ERROR? 

6394 3622 005737 001214 TST SENV * 5s uni UNDER APT? 
6395 033626 1413 BEQ 12% I T: 
6398 732 001174 11S: rst shacTvPE j jE INISHED LAST MESSAGE? 
6398 p33p30 pe 7 o00004 001176 MOV SY(SP),SFATAL :;GET ERROR # 
6399 033644 062766 o00002 o00004 ADD #2,4(SP) BUMP RETURN ADDR. 
6400 3652 005237 001174 INC SnScTYPE +7 TELL AP abit TO TAKE ERROR 
6401 3656 1 7 033702 12S: CLRB SFFLG *?CLEAR FATAL FLAG 
402 033662 105037 033701 CLRB $LFLG ;;CLEAR LOG FLAG 
6403 033686 105037 CLRB SMFLG ?CLEAR_ MESSAGE FLAG 
6404 033672 012601 OV (SP)+,R1 ::POP STACK INTO Ri 
640S 033674 00 MOV (SP)+;RO ;3POP STACK INTO RO 
6406 033676 000207 RTS c 
eda oaa707 «=O Sree: Bye 6 ; INES: FLAG 
6409 33503 000 S$FFLG: :BYTE O ::FATAL FLAG 
6410 033704 * EVEN 
6411 000200 APTSIZE=200 
6412 000001 APTENV= 
6413 000100 APTSPOOL=100 
6414 000040 APTCSUP=040 
BuIS .SBTTL POWER DOWN AND UP ROUTINES 
Pile Paattu Se ee 
6419 033704 012737 O34044 co002e4 {POWER MOV SSILLUP,@SPWRVEC ; pSET FOR FAST UP 
6420 033712 012737 000340 O000c6 MOV #340, JBPWRYVEC+2 : BRI 
6421 033720 010046 MOV RO,-tSP) PUSH: Ro ON STACK 


MAINDEC -11- ORLPA-A 
DRLPA.P11 


034076 


oO 
- 


a 


888= 
a 
as 


Dee abs fan bos pes hae pe 
Benne 
Ww 


NN 
OW W 
"IN 


—-OO0000000 
$un 
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POWER DOWN AND UP ROUTINES 


033704 
000340 


047520 


034110 
000377 


034110 


oo00e4 


oo00e4 


oo0de4 
000026 


042527 


145376 
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MOV R1,-(SP) ;;PUSH R1 ON STACK 
MOV Re; - (SP) ;:PUSH Re ON STACK 
MOV R3, -( P} ; PUSH Ra N STACK 
MOV RY’ -(5P) ??PUSH RY ON STACK 
MOV RS’ -(SP) +:PUSH RS ON STACK 
MOV ashe 5 (SP) :: ON STACK 
MOV $SAV & 33S ve 

nov #SPWRUP, J#PWRVEC’;;SET UP VECTOR 

BR ow“! ;;HANG UP 


$2 KEKE ALAEKKAKRRSRAA RRR RA RAAA RELA AKA RKRRAL AK AAARAAEAAAA AAA AA LERE 
:POWER UP ROUTINE 


$PWRUP: MOV #SILLUP, J#PWRVEC 5 4SET FOR FAST DOWn 

MOV SSAVR6, SP 33 SP 

CLR SSAVRE’ ::WAIT LOOP FOR THE TTY 
1$: INC SSAVRE ::WAIT FOR THE INC 

BNE 1 :20F WORD 

ny fapssegew® pee rack The ge 

MOV {2b} t°RG tt BOp Taek NTO RY 

MOV (SP)+'R3 ::POP STACK INTO R3 

MOV (SP)+; Re $3 TACK INTO Re 

MOV (SP) +58 ::POP STACK INTO R 

MOV (5P)+'R ::POP STACK INTO R 

MOV #SPWRON, JUPWRVEC';;SET UP THE POWER DOWN VECTOR 

MOV #340, J#PWRVEC+2 5 PRIO:7 

TYPE :REPORT THE POWER FAILURE 
SPWRMG: aitoRO SPOWER *:POWER FAIL MESSAGE POINTER 
SILLUP: HALT ;;THE POWER UP SEQUENCE WAS STARTED 

BR .-2 :: BEFORE THE POWER DOWN WAS COMPLETE 
SSAVRE: O ::PUT THE SP HERE 
SPOWER: .ASCIZ <15><12>"POWER™ 

EVEN 

.SBTTL ; WIR ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. 
WIR CLR WIRT 
1$ cHPe #377, JKMAD2 

INC WIRT ; TIME OUT? 


MAINDEC -li- os 
ORLPA.P11 WIR 


034102 001371 


034104 
034106 


104003 


MACY11 
ROUTI 


2 
NE 


7 (654 
TO W 
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Art FOR “DRLPXO” MICROCODE TO BECOME READY. 


BNE 1$ 
ERROR 3 ; TIME OUT ERROR,KMC-11 ERROR. 
2s: 


SEQ 0169 


DRLPA.P 


6470 034106 
6471 034110 


6481 034112 
6483 034116 
84 4124 


6487 034144 
5458 
b4E9 
6490 

; 6491 

| 6492 
e493 
6494 

| 6495 

6395 

| 6497 

| 6498 
5499 
6500 
6501 
6502 

| 6503 034146 

| 6504 O34154 

| §S0S 034160 
6506 034166 
6507 034172 
6508 034200 
65039 034204 
6510 O34ele 
6511 O34216 
65le O34e2e2 
6513 O34226 
6514 O34e32 
6515 034236 
6516 O34e42 
6517 O34e44 
6518 O342S0 
6519 O342eS4 
6 034 
6521 O3426e 
652e 034266 

| 


ares -“Li- ae” 
ll WI 


900207 
000000 


004737 


WOW 
NEN 


ecpege 
HBQggoGsag 


pOoRRORR 
tats 


Tiger) 
WN 
WWW 
NNNN 


Oo 
oO 
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ROUTINE TO wAIT FOR “DRLPXO 


040626 
044112 
000001 


o40S4e 
145332 


034474 


034524 


14S$3Se2 
148334 


001126 


034466 
034510 
034464 
034506 


034516 


B14 
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"MICROCODE TO BECOME READY. 
RTS PC 
WIRT: .WORD O 
£ 
 ¥SYNC IN THIS ROUTINE, WE’ vet TRY AND INIT 
1% AND RE-SYN NLPA-l1 S STEM. 
7 1ST WE DO A RESET. 
1 i 2ND WE RE-START CLOCK 
1% NO ERROR CHECKING 
:% CALL= JSR PC,SYNC 
SYNC: JSR PC, SRESET ;RESET SYSTEM 
MOV @LPADL ;CLOCK INFO 
BIS eetTh aLPCI : START 
JSR PC, SDELAY : DELAY 
As aLPSO, $BDDAT :DUMB READ OF STAT REG. 
AVERAGING ROUTINE 
PxAT THIS. POINT IN TIME ALL SAMPLES FOR ALL CHANNELS HAVE 
: ¥BEEN t ONTERL ORED IN “BUF 
EVENT TAL NTERLEAVED BUFFER FORM” GIVEN BY THE FOLLOWING FORMULA: 
j wSL=eaNt EQUALS THE LOCATION OF A SAMPLE, 
?*N E Hen ae S SAMPLES WERE TRKEEN' ON, AND R1 
"IS rahe R ARR ser ao “BUFFER” INITIALLY 
; c rySR PC 
:xNOTE: Cuandes. BE CHAN. 
+ SEPDR=O NO; 21, YES 
i TOLER=TOLERENC 
AVERR: MOV CHANS,C ;SET TO FIRST CHAN. 
MOV CBUPPER'R Ri 
SPEP: MOV CHANU, SAMOFF 
ASL M 
nov CHAN, CHAN 
AVERRL: MOV #16. , SAMCNT 
ADD CHAN! | R1 ;PUT CHAN OFFSET IN 
CLR AVTKN ?SET INITIAL SEND T TIONS FOR THIS CHAN. 
CLR RTEMP 
MOV (1),RLOW 
MOV (1)’RHIGH 
2S: CMP RHIGH, (1) ;FIND REAL HIGH VALUE. 
BGT 3$ 
MOV (1),RHIGH 
3S: CMP (1)? RLOW ;FIND REAL LOW VALUE. 
BGT 4§ 
MOV (1),RLOW 
4g: MOV (1)’RTEMPL :GET CURRENT SAMPLE. 
ADD RTEMP1, AVTKN :"BOOT” ADD ALL SAMPLES. 
ADC RTEMP 


C14 
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ROUTINE TO WAIT FOR “DRLPXO” MICROCODE 16 BECOME READY. 


DRLPA.P11 ; WIR SEQ 0171 
6524 7 034510 ADD SAMOFF , R1 
BSS¢ 83309 Bpesse Gauede Bee || SAMCNT” 
65 io oO BNE 23 
652 i O34514 034526 MOV AVEXP, RTEMP1 
_ 6528 7 Si2 o34Se6 ADD TOLER’ RTEMP1 
6529 7 034526 034522 CMP RTEMP1, RHIGH 
6530 BLT V1 ;NO-THEN REPORT ERROR. 
6 1 i z 7 034512 O34526 SUB TOLER, RTENMPL  YES-OK-CHECK LOWEST READING. 
£238 paq3ea 483333 034526 CMP LOW, RTE 
b534 309 15 BLT ERAVI NO-REPORT ERROR. 
6 7 034512 T OLE: DOES OPERATOR WISH “FORCED” TYPEOUT? 
E555 ESS6S BEEF coomoe owen avermn: BS Ete © dE T0Solnexr cxmn-aur 
| 68 Baua%— Obse37 | OaN4oe INC HAN SIF DOEn ALL CHANS-EXIT. 
65 O34402 023737 O34466 034476 CMP CHAN, CHANF ‘OTHERWISE LOOP. 
6540 034410 3675 BLE ERRL 
Boul 034412 000207 RTS 
6543 ERROR REPORTER 
6544 
654S 034414 ERAVI: 
6546 O34414 ERAVe: 
6547 O34414 005737 034540 TST REPOR ;REPORT ERROR? 
65438 O34420 001002 BNE 
6549 O34422 000137 034370 IMP AVERRN 
6550 034426 1S: 
b551 ;GO TYPE--OCTAL ASCII(AL) 
aa: 034426 042737 170000 o34S20 BIC #170000, RLOW 
6553 ;GO TYPE--OCTAL ASCII(AL) 
6554 034434 042737 170000 034516 BIC #170000, AVTKN 
6555 ;GO TYPE--OCTAL ASCII(AL) 
65 Oo34442 042737 170000 o34Se2 BIC #170000, RHIGH 
6557 O344SO 104020 ERROR 
65 O0344S2 000746 BR AVERRN 
6 + % 
6 ; POINTERS USED BY REPEATIBILITY TEST 
6563 : 
564 CHANU: 0 
i CHAN7:0 
B56 Nag7:0 
NA17:0 ; 
6568 CHANI: 0 ;LEFT JUSTIFIED CURRENT CHANNELL. 
CHAN: OQ ?CURRENT CHANNELL 
GAIN: 0 ‘CURRENT GAIN 
ADWD: 0 ; WORD T TO AD 
CHANS: 0 :STARTING CHANNELL 
HANF: O :LAST CHANNELL 
74 HANSR: O 
Ky CHANFR: O 
000000 CHANNO: O 
6577 034506 oo00000 SAMCNT: O ;SAMPLE COUNT 
| 
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DRLPA. P11 ; WIR ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. SEQ 0172 
6578 034510 o00000 SAMOFF: 0 ;SAMPLE OFFSET | 
6 28 12 TOLER: C j LOLERANCE BEF ORE ERROR IS REPORT 
6 DOOOOL AVEXP: ;EXPECTED AVER 
oo00000 AVTKN: O :AVERAGE OF SAMPLES TAKEN 
nOOCOd LOW: oO *LOWEST SAMPLE TAKEN 
| RHIGH: 9 i HoGHeST SAMPLE TAKEN 
RTEMP1: O 
6 REPMAN: O ;SECTION RESERVED FOR 
0 ?MANUAL REPEATIBILITY 
0 ‘WHERE OPERETOR ENTERS 
68 aoa P ‘IN INFORMATION 
000 aBYTE 0,0 
| 043702 MAKE: TYPE, MO ;WELCOME MESSAGE 
001200 CLR STESTN 
MOV (SP)+,RO 
6S 000117 CMPB (RO), &'0 
6599 00e BNE 1$ 
6600 2 i 035516 LOOPJ 
1 74 1 1 O42615 1$ TYPE, M1 
6602 104411 LIN 
6603 O34602 012600 MOV (SP)+,RO 
b604 O34604 1 1037 001772 MOV (0), SVERSN 
10 1 000115 CMP’ (0); #'M 
14 14 BEQ 2s 
1 000104 CMPB (O0),#’D 
6609 O346e4 1 tf 043030 2s BNP E Me - 
6610 O34630 104412 Rooct 
6611 012637 O44114 MOV (SP)+,KWT+2 
bbe 104401 043051 TYPE ,M3 
661 h Rooct 
6614 44 01 044116 MOV (SP)+, KWT+4 
6615 650 012737 OO000i 001124 3S: MOV #1, SGODAT 
6616 22737 000104 001772 CMPB #°b, SVErSN 
Pete DSUEEE rent 043114 Pee M4 . 
6619 nettsz4 iowa Rooct 
6620 74 Ol 11 4S: MOV (SP)+, $GDDAT 
b621 700 1 7 001124 oo0011 CMPB $GDDAT, #11 
6622 706 1 BHIS C7 
6623 034710 0137 001124 001754 MOV $GDDAT, MYTEMP 
6624 716 012737 000001 001126 MOV #1. SBDDAT 
PeSe 584 Bt 702 ae MOV eJOBO.RL FREE CORE 
6627 034734 010237 OS6246 MOV FRECOR , 
ces Gary Shee Gotiss uipeo: Wee, eco 
6630 750 bi 3746 Bort 6 MOV’ SBDDAT, -( SP) ;;SAVE SBDDAT FOR TYPEOUT 
6631 034754 104402 TYPOC ::GO TYPE--OCTAL ASCII(ALL DIGITS) 
} | 
ss fy 5 ee es 


E14 
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DRLPA.P11 ; WIR ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. SEQ 0173 
6632 034756 104401 043144 TYPE, M6 
6633 O34762 104401 043154 TYPE. M7 
6634 0347 104412 RDoct 
6635 O34 0126 I MOV (SP)+, (1) ;STORE MODE WORD 
6636 7 104401 043212 TYPE MB 
6637 034776 104412 RDOC 
6638 012661 oo000e MOV (SP5+,2(1) 
66 1 401 043347 1S: TYPE M10 ;# OF BUFFERS 
6640 OC 19 10441 RDoct 
6641 1 ii 1 000007 MOVB (SP)+,7(1) 
6642 7583 BEQ $ 
6643 012737 035664 oo0004 MOV #ERTOUT,a#4 ;IN CASE OF BAD BUFFER AREA 
6644 116137 000007 O01202 MOVB 7(1),$PASS 
664S 1oeae1 000007 DECB 7(1) 
E46 938049 910103 MOV R1,R3 
6647 16104 oo0002 MOV 2(1),R4 
664 006304 ASL RY 
664 10261 000010 2s: MOV Re, 1061) 
6650 4 104401 035062 TYPE &$ ;; TYPE ASCIZ STRING 
6651 000410 BR 4§ *?GET OVER THE ASCIZ 
bbe --65$: .ASCIZ <200>#BUFFER ADDR: # 
66 035102 64s: 
6654 102 010246 MOV Re, -(SP) ;;SAVE Re FOR_TYPEOUT 
6655 1 1ouNige TYPOC ::GO0 TYPE--OCTAL ASCII(ALL DIGITS) 
bb56 1 0604 AD RY, R2 
66 110 005712 TS (23 
66 035112 005337 oo01202 DEC $PASS 
6659 116 GO1503 BEQ 3$ 
6660 1 701 ooo0004 ADD #4,R1 
6661 035124 000751 BR 2s 
bbbe 035126 016 i 3S: MOV R3,R1 
6 1 104401 043244 TYPE, ;USER SW= 
6664 035134 016346 oo00004 MOV 4(R3),-(SP) :;SAVE 4(R3) FOR TYPEOUT 
6665 038149 1g84de TYPOC ::G0 TYPE--OCTAL ASCII(ALL DIGITS) 
6666 142 104401 043426 S$: TYPE, Ml2 :BUFFER OVERRUN FATAL? 
6667 035146 LOwnit RDLIA 
6668 0351 126 MOV (SP)+,RO 
6 1 14 310 000240 BIC #240, (0) 
bess 1 122710 000131 CMP #’y, to) 
6671 1 961004 BNE 6 
6672 164 2761 100000 oo0006 BIC #B1T15,6(1) 
6673 0351 GOG40E BR 7 
66 174 1 000116 6S: CMPB (0), #’N 
6675 BNE 
1 100000 oD0006 BIS #B1T15,6(1) 
6677 035210 005071 o00004 7$: CLR a4(1) ;CLEAR USER WORD. 
6678 035214 10440} 043551 TYPE M14 :DELAY BEFORE START 
6679 O3se 10441 RoOCctT 
6680 0 012661 ooo00s4 MOV (SP)+,54(1) 
668: O35226 104401 043757 TYPE, M20 ;CHAN ADDR WORD 
6682 O35e3e 104412 RD 
6683 O35e34 012661 000056 MOV (SP)+,56(1) 
6684 40 104401 043575 TYPE,M1S ;# OF CHAN 
6685 035244 104412 Rooct 


F14 
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DRLPA.P11 ; WIR ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO bECOME READY. SEQ 9174 

6686 012661 000060 MOV (SP)+,60(1) 

6687 194404 044003 TYPE, M21 ;CLOCK RATE 

coe arseei ROY" carpe sec) 

Pe Sa 11 rtiitela BIT #BIT14'BIT1S,(1) ;EVENT OR START MASK 

6691 1453 BEQ 38 

6692 104401 o44020 TYPE , M22 

66393 pOowie rRooct 

6634 Lepel 000064 MOV (SP)+,64(1) 

6693S 104401 044051 TYPE, M23 

5696 104412 Rooct 

Bea 012661 o00066 MOV (SP)+,66(1) 

6698 104401 044067 TYPE, M24 

6639 04412 RDoctT 

6700 12661 000070 MOV (SP)+, 7001) 

6701 32711 001400 BIT #BIT8!BITS,(1) ;RANDOM CHANNEL? 

6702 1031 BNE 95 :NO EXIT THIS LOOP 

6703 16037 oo00060 001202 MOV 60(0),$PASS ‘YES GET NUMBER OF CHANS. 

6704 12703 oo0006e MOV #<JOB1-JOBO-34> ,R3 

6705 060103 ADD R1,R3 

6706 010361 ooo0so MOV R3,50(1) 

reais 138 

67 104401 035364 TYPE 67% ;; TYPE ASCIZ STRING 

6710 000407 BR 66S ?:GET OVER THE ASCIZ 

6711 --67$: .ASCIZ <200>#RANDOM CH. =8 

o7le bés: 

6713 104412 RDOCT 

6714 012623 (SP)+, (3)+ 

6715 005337 001202 $PASS 

6716 001361 BNE 13$ 

o7i2 012713 140000 MOV #BITIS!BIT14, (3) ;ADD EOC MARKER. 

6719 9S: 

p25? 104401 043275 TYPE , M97 

6722 O35 104412 Rooct 

£354 Oseuse Oaee1i onoeOD BY wBITFTCL) OUTPUT DEVICE? 

b55¢ B34 T404 BEQ 10s ’ ? NO-CONT INUE 

6726 440 104401 043660 TYPE, M18 :MAKE BUFFER 

6727 444 sowagt 043724 TYPE, M19 :PRESS CONTINUE 

67 450 0102 056246 10$: MOV Re, FRECOR 

6729 035454 G23 27 OS624%6 oo0000G CMP FRECOR, #ORLPXO ;CORE EXCEEDED? 

6730 O354%62 103100 BHIS ERTOUT ?YES-ERROR MESSAGE! 

6731 G35464 le oa? 001126 001124 cnr SEDOAT, SGDDAT :DONE ALL? 

£335 4 poas4s 001126 INC $BDDAT 

6734 012703 o55204 MOV #J0B1,R3 ;GET JOB SIZ 

6735 cs 162703 O55066 SUB #JOB0;R3 

6736 035510 060301 ADD R3,R1 ;UPDATE JOB POINTER 

6737 035512 000137 034744 IMP LIPED :LOOP FOR NEXT JOBS DATA 


6739 035516 118: 


MAINDEC -11- ORLPA-A 
ORLPA.P11 ; WI 
6740 035516 004737 
at 
6743 O3SSee 104401 
6744 O35Se6 000414 
Eoue 035560 
eoue 03S 104411 
erie Bseee Suisse 
6750 QO 0 14 
6751 035572 000137 
Pel rs game 
6755 O3eeb6 B161 97 
o7e8 035614 005003 
67 137 
Gres Sus plazg 
ese O03S6e6 010337 
6762 035632 005237 
6763 38 737 
Ge Bes 
766 035646 001365 
6767 035650 062701 
cre Bete are 
6770 O35660 000744 
6771 O 000000 
677e 
a 
6775 83 104401 
6776 035670 O00434 
—— 
677 p3e7e8 104401 
e7e0 038766 000415 
678e 036022 
6783 O360ee 000137 
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ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. 
036026 LOOPJ: JSR PC, FLASH 
; ;REPORT DATA 
035530 TYPE 65S i; TYPE ASCIZ STRING 
BR 45 :GET OVER THE ASCIZ 
ii gSS: "ASCIZ 200) #REPORT DATA’FOR JOB O78 
RDLIN 
MOV (SP)+,RO 
000131 cHPe (0), 8! 
034S46 1S: IMP MAKEI 
osso66 2S: MOV #JOBO Ri 
001754 MOV MYTEMP,.R 
000060 O344S4 35: MOV 60(1), eaNu ;GET NU. OF CHANS. 
CLR R3 
0344S4 MOV CHAN, Re ;NU OF CHANS 
034474 4: MOV « We 
034476 MOV R3, CHANF 
034S40 INC REPOR 
034146 ISR PC, AVERR 
IN R 
DE R 
BNE 4§ 
000116 ADD #<JOB1-JOBO> ,R1 
DEC RO 
BNE 3$ 
BR 1$ 
HALT 
ERTOUT: 3 
035672 TYPE 65S ;; TYPE ASCIZ STRING 
BR 4§ ‘GET OVER THE ASCIZ 
54 B58: "ASCIZ <200) INSUFFICIENT CORE TO DO REQUEST,PLEASE SPECIFY SMALLER« 
035770 ; TYPE 67% is TYPE ASCIZ STRING 
BR 6S ::GET OVER THE ASCIZ 
ij878: -ASCIZ <200>#BUFFER oOR’LESS BUFFERS# 
O34S46 f IMP MAKE I 


tS FLASH! Re OUT ADE. TO EXERCISE 1-8 JOBS UNTIL DONe. 
oot Be MST uP To ASCII noe M FOR DEDICATED OR MULTIUSER. 


Pas 3 4 CLOCK STAT 
"OBO JOB? PRE SE 
SGDDAT= NO. OF JOBS TO EXERCISE 


CALL= JSR PC, FLASH 


Wie he 3 CO OO 
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DRLPA.P11 ; WIR ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. SEQ 0176 

p74 ;% RETURNS WHEN ALL DONE. 
6796 036026 FLASH: 
6798 036026 004737 O40626 2s: JSR PC, SRESET 
6793 036032 012777 OS4130 143436 MOV #OEVLST,@LPADL ;SET ADDR. OF DEVICE LIST IN RDA WORD 
6 936040 05413 CLR DEVLST : INDICATE SIZING 
68 i 4 113737 iSi2 0S4131 MOVB VERSN,DEVIST+1 ;SET VERSION NUMBER 
6803 0360 777 O01 143406 BISB #1, aLPCI ;SET GO. 
6 b3555 4 JSR PC, SOELAY 
6805S 036064 012777 O4411le 143404 MOV #KWT, JLPADL ;START CLOCK 
6 036078 7 OoO000! 143366 BIS #BITO, aLPCI 
6807 1 12700 O0S4S20 MOV #TOD0d, RO 
6809 0361 ggs020 3S: CLR (0)+ ;CLEAR QUE AREA. 
6810 0361 02 ossoo4 CMP RO, #DONEC 
6811 ll2 O01 BNE 3$ 
b8ie 036114 1 124 MOV $GDDAT, RO ;GET NO. OF JOBS 
681 1 12701 4520 MOV #TODOQ' Ri ‘GET QUES AREA 
6814 036124 O12e702 OSS5066 MOV #J0B0, Re ‘PICK UP 1ST JOB ADDRESS 
6815 139 0127 Be04 MOV #JOB1,R ?CALCULATE ADDR DIF. 

1 1 i 7 66 SUB #J0B80'R 
681 i140 O01 4640 MOV RO, TObOC ;REMEMBER HOW MANY JOBS ARE QUEUED 
6818 036144 012700 000010 MOV #8: ,RO 
6819 036159 gos? ie 4$: rst (2) ;ANYTHING IN THIS JOB?? 
eee 154 prAaot “ MOV RS cis ;STORE FIRST JOB 
6823 156 ADD R3,R2 ;POINT TO NEXT JOB 
6824 1 DEC RO :DONE ALL JOBS? 
8525 036 162 001372 . BNE 4s ve : NO-LOOP. 

sie 
pass 838153 BB AATE 001126 SbB SERRE  sappat ;DON’T WAIT FOR CLOCK JOBS(DR11K ONLY) 
6828 036176 7 002014 CLR FUDGE 
6829 137 15 MOV VECT1,RO 
6830 t 7, 41 MOV SAV, (0)+ 
1 MOV #340, (03+ 
6832 036216 012720 036334 MOV #INPSRV, (0)+ 
6833 O36222 012720 MOV ‘ $+ 
6834 O26e56 000100 143232 BIS é 1T6, aLPCt 
900100 143230 B #BIT6’ aLPCO 

6836 013737 001124 001774 MOV $GODAT, TAXING ;GET NO OF REQUESTS. 
6837 33 990200 001774 ADD #200, TAXING 
6 337 1774 ASL TAXING ;MUL X2 TO GET TIME. 
6839 036262 005037 177776 CLR PS 
6840 036266 023737 001124 001126 SS: CMP $GDDAT,SBODAT  ;DONE ALL JOBS? 
sey 1414 BEQ 

4 ? 4737 onosHe JSR PC, SDELAY 

4 337 1774 DEC TAXING 
6844 036306 001367 BNE S$ 
684S 036310 017737 1431S2 001124 MOV JLPCI, SGDDAT 


a B26316 017737 143150 001126 MOV aL PCO; SB008T 


4017 ;JOB(S) FAILED TO fINISH (LPA FAULT) 


DRLPA. P 


036326 
036326 


0365Se 
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104021 
013737 
000433 
001005 
005071 
013760 


aT grt (654 
ROUTINE TO W 
040626 
OS4640 


o0S4S20 


143116 
OS4640 
000100 
000001 


143070 
143062 


001774 


001770 
001764 


001762 
001766 


001766 


001124 001126 


ooo004 


001770 OS4642 


13-DEC-77 1 
AIT FOR “DRLPXO 


7$: 


INPSRV: 


1$: 


es: 


IEX: 


OUPSRV: 


40$: 


NER: 


ERROR 21 


MOV 


BR OUPEX 





T14 


2:58 PAGE 147 
" MICROCODE TO BECOME READY. 


PC, SRESET 
PC 
TODOC 


IEX 
RO, -(SP) 
#TO00Q, RO 
(O)+ 


1$ 
ae 


TODOC 

es 
#BIT6,aLPCI 
#BITO,adLPCI 
(SP 0 


@LPADL , ALPADL 

aL PCO, ALPCo 
LPCO’ RO 

ers RO 

RO, USJANO 

RO;R3 


ALPADL ,R1 
aALPco+l 


@LPCI,ALPCI 

ALPCO+1, ALPSO 

ALPSO+1 

#250, ALPSO 
40$ 


SBODAT 
OUPEX 


SGDDAT , SBDDAT 


10$ 


a4(1) 
ALPADL, TABLE(O) ; 


; SEE 
;IF 


SEG 0177 


;ANYTHING TO dO? 


;SAVE RDA ADDR. 
:ZERO THIS JOB 


;DON’T ALLOW ANOTHER INTERRUPT. 
;SET GO! 


;SAVE REGS. 


;NO TIME OUT IF ACTIVE. 


;SAVE RDA ADDR. 

;GET CONTROL_IN REG. 

NOW LETS GET USER NUMBER. 
:RID OF REST OF JUN 

:GET USJNO 


IF_BIT1S SET SHOWING ERROR 
NO ERROR, PROCEED. 


;ELSE REPORT AN ERROR. 
hax STATUS D REG SO ITS EASIER TO READ. 
; LEGAL CRROR. BIT 14 SET IN USW 


;LPA-11 MICRO CODE REPORTED AN ERROR 
;FIX COUNT FOR EXIT TO MAIN LINE FLASH. 


;CLEAR USW 
:SAVE RDA ADDR. FOR FUTURE REF. 


J14 
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ORLPA.Pil ; WIR ROUTINE TO WAIT FOR “DRLPXO" MICROCODE TO BECOME READY. SEQ 0178 
6302 036560 10S: 
6903 036560 016001 os464e MOV TABLE <Q), Ri ;GET RDA ADDR FROM TABLE 
6904 036564 016103 000004 MOV (1),R3 :GET ADDR OF USW 
6905 936570 116302 000001 MOVB 103)" Re 'GET LAST BUFFER USED 
6306 036574 005202 INC Re ‘UPDATE FOR NEXT BUFFER 
63907 036576 O4270e 177770 BIC #177770,Re :CLEAN OFF JUN 
6308 03 116104 000007 MOVB VBMi 1), RY :GET LAST BUFFER MASK. 
6303 0 042704 177770 BIC #177770, RY :CLEAN OFF JUNK 
6911 036612 O42702 177770 30S: BIC #tC<7>, Re ;VALID OFFSET. 
6312 036616 110263 O00001 MOVB Re, 133 
6913 O36622 120204 CMPB Re’ RY ;LAST BUFFER ? 
6914 O3b624 0034 BLE OUPEX ANCH 
6915 03 052713 o40000 BIS #40000, (3) oes STOP JOB BIT 
6316 036632 042777 OO00200 142632 OUPEX: BIC #BIT7, ILPCO :CLEAR READY OUT 
6918 O36640 012604 MOV (SP)+,R4 ;RESTORE REGISTERS 
b319 SSeed8 012603 MOV (SP)+'R3 
6921 036644 012602 MOV (SP)+,R2 
6922 036646 012601 MOV (SP)+/RI 
63923 036650 012600 * MOV (SP)+'RO 
b3e4 036652 o00002 RTI 
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DRLPA.P WIR ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. SEQ 0179 
$335 
6928 . tSTHIS SUB CODE IS USED TO INITIALIZE THE LPA-11 
6929 . ; ¥F IRST WE WILL LOAD MICROCODE INTO KMC-1 
6930 :4NEXT WE WILL INIT BOTH UPROCESSORS 
6931 ; :%THEN WE WILL LOAD DEVICE TABLE IN SLAVE UP. 
6938 :%THE ORDER SF CoaD IS DETERMINED BY THE USER. 
6934 Xe CALL= JSR RS, SLPAI 
6935 i a 0 ;ADDR. OF DEVICE ADDRESS. 
6936 :% ROUTINES REQUIRED: .LOADLP 
6937 ?% PROGRAMS REQUIRED: DRLPXe 
6938 1% 
6939 
6940 ;% ;RETURNS WITH SAERR=1 IF SLAVE 
; Bou 1 tMICRO SAYS AN ADDR. DOES NOT EXSIST. IN THE LIST. 
;% 
6943 036654 $LPAI: 
pad 036654 013746 oo0004 MOV 4,-(SP) 
6946 036660 000413 BR 318 ;FIELD DOES NOT HAVE A BUS SWITCH 
6947 :WORRY ABOUT,SO WE WILL UNCONDITIONALLY 
6948 :BRANCH ARROUD THE NEXT CODE THAT 
6949 ; WORKS aee ON A SWITCH. 
6950 i CODE obee N HERE IN HOUSE 
6951 Y PATCH THIS BRANCH 
6952 HTRSTRUCTION 10, TO aes <NOP> OCTAL <240> 
6353 PROGRAM WITH A SWITCH. 
6955 sNOTE THIS “SWITCH” IS A PIECE OF INHOUSE 
6956 ; TEST EQUIPMENT ONLY IT CONNECTS 
6957 HE UNIBUS THE 170 BUS FOR 
6958 !CERTAIN TESTING. 
69539 036662 012737 036706 O00004 MOV #30$,4 
6960 036670 005237 170000 INC 170000 
6961 036574 104401 036702 TYPE 65$ ;; TYPE ASCIZ STRING 
b3b¢ 036700 000401 sae _ bus ::GET OVER THE ASCIZ 
6964 036704 64S: 
6965 036704 O00401 BR 31$ 
6 036706 O22b26 30$: CMP (SP)+, (SP)+ 
7 036710 012637 oop0004 318: MOV (SP)+°4 sALL THIS JUNK MUST BE REMOVED!! 
6968 036714 005037 037532 CLR $AERR 
6369 036720 004537 037534 ISR RS, SLOAD ;LOAD MICRO-CODE. 
6970 724 oo00000cG “WORD DRLPX2 ‘FILE “ORLPXe. OBJ" 
6972 036726 0S2777 oO40000 142532 BIS #BIT14,Q9KMADO ;ISSUE KMC+DMC INIT. 
6974 036734 1S: 
6975 ’ ;"HANGS” HERE THEN KMC-11 ERROR. 
6975 036734 010146 MOV R1,-(SP) 
6977 0367 005001 CLR R1 
6978 036740 005201 2S: INC Ri ;STALL FOR OMC-UP 
6979 O36742 601376 BNE 2$ 
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36752 
036754 


b3e768 


036766 
036770 
036776 
036776 


037002 


037004 


037254 
037346 
037346 
037356 


537380 


o2777 
105201 
001376 


881401 


104000 
012777 
004537 


104000 _ 


000774 


122777 
0 


104401 
000430 


104401 
000434 


112737 


113777 
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104000 


000040 


po0004 
O4O444 


000377 
000377 


ooooo4 
177777 
177777 
037062 


037170 


037256 


177777 
oo0000 
037500 


142514 


142502 


142474 


142456 
1424Se 


142440 


037500 


L1i4 
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ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. 
MOV #BIT1S!BIT11,a3KMADO ;SET RUN, AND ENABLE ARBITRATION. 
ess: INCB R1 
BNE 25S 
BIT 4B1TS, IKMADO ;SLAVE READY? (READING IPBM SR) ; 
;FATAL LPA-11 ERROR SLAVE NOT READY. 
ERROR 
38: MOV #4, IKMAD2 ;READ FAST PATH 
. ISR RS, STOUT ;-TOUT-CHECK FOR TIMEOUT 
ERROR ;/TIME-OUT ERRO 
:/WE FAILED TO. COMPLETE 
: CURRENT OPERATION. 
: CONTINUES IN THIS LOOP 
:/WOULD MAKE US CHANG” HERE 
BR 4$ 
;/RETURNS HERE-FROM-TIMED OUT. 
cNPB 8377, aKMAD2 ?WAIT TILL KMC DONE COMMAND. 
cMPB 8377, 3KMADY ;IF FAST PATH=377 THEN ERROR. 
ERROR ; IPBM ERROR (SLAVE SIDE) 
:YOU MUST RUN IPBM DIAGNOSTIC. 
35S: CMPB #4, IKMADY ;IS THIS THE CORRECT VERSION OF MICRO-CODE? 
BEQ S$ 2 Z j-YES-CONTIN UE. 
INC #-1 
BNE Sa 
INC #-1 .. we 
BNE = ; vie 
TYPE 67% “4 ji TYPE of 2612 STRING. 
BR 63° >GET 
iig78: ASCIZ ¢880> "Wd ARNI &’G THIS PROGRAM WAS DESiGNED TO RUN WITH VERSION 4" 
2 TYPE 23% ss Tyee ASCIZ STRING 
R :GET OVER THE ASCIZ 
iib28: ASCIZ <200>"MICRO-CODE: "ANOTHER VERSION CODE WAS DETECTED.” 
: TYPE 71$ 3; TYPE ASCIZ STRING 
R 20$ OVER THE ASC 
44218: ASCIZ <200>"THIS MAY OR’MAYNOT CAUSE FALSE ERROR TO BE REPORTED.”<200><200> 
S$: MOVB #0-1,115 sDAC CODE FOR SLAVE. 
MOV (5)+,P1 Ger NEXT DE DEVICE ADDR. 
bs: CMP (R1); 40 TERM REACHE 
BEG 10$ 
INCB 11$ 
MOVB 11$, 2KMADY ;FIFO DATA 


037500 


142100 


SEQ 0180 


14 
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DRLPA.P11 ; WIR ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. SEQ 0181 
7034 037376 004737 037502 JSR PC, 20% ; ISSUE SEND 
7035 037402 112177 14207 MOVE (RL) +, IKMADY i 96ND. LQu BYTE OF DEVICE ADDR TO SLAVE. 
70 74 004737 063750 JSR P EN 
? 741 ite 7 12060 MOVB (RL )+, JKMADY :SEND HIGH BYTE OF DEVICE ADDR. TO SLAVE. 
7038 741 4737 03 JSR PC, 20$ 
7040 O37422 032777 oOO00002 142036 7S: BIT #3171, KMADO ;WAIT FOR FIFO DATA 
204 0374 b01374 BNE ? =] NO DATA. =0 DATA. 
204e ‘0374 112777 oo0002 142032 MOVB #2, IKMAD2 READ FIFO. 
7044 037440 8S: 
2046 037440 004537 O40444 : JSR RS, S$TOUt ;-TOUT-CHECK FOR TIMEOUT 
7047 037444 104000 ERROR ; /TIME-OUT ERROR 
7048 :/We FAILED TO COMPLETE 
7049 ?/CURRENT OPERATION. 
7050 : “CONTINUES IN THIS LOOP 
7081 :/WOULD MAKE US “HANG” HERE 
7053 037446 000774 BR ad ‘ 
7085 . ; /RETURNS HERE-FROM-TIMED OUT. 
7056 O374SO 122777° 000377 142014 CMPB #377, IKMAD2 :WAIT FOR READ. 
7057 037456 001370 BNE 
7058 037460 105777 142012 TSTB aKMADY ;WAS A ZERO RETURNED? 
7059 037464 001734 BEQ 6S YES GET NEXT ADDR. 
as 037466 005237 037532 INC SAERR i SLAVE REGEN [RETURN CODE saves 
30be iPeYy oe Rei IF SAVE GIVES ERROR. 
7063 037472 o0S5041 CLR -(1) :GET RID OF REFERENCE TO BAD ADDR. 
7064 037474 012601 10S: MOV (SP)+,R1 
7065 037476 o00205 RTS RS ;RETURN ALL ADDR. CHECKED. 
7067 037500 000 : Wd ; HOLDS P FFSET 
708 " e-em 5 8 HO-RESBES SBBR. HHBLE" 
7070 037502 112777 oOO0003 141762 20S: MOVB #3, IKMAD2 198m FIFO WRITE 
7071 037510 21s: 
707¢ 037510 004537 O4O444 : ISR RS, STOUT ;-TOUT-CHECK FOR TIMEOUT 
7074 037514 104000 ERROR -OUT E 
7075 ue Eas LED ic "ONPLETE 
7076 aE Le ION. 
7077 ZEON IMES an Tee QOP 
707 - 7WOUL E US “HANG” HERE 
7080 037516 000774 BR 215 
7082 7k TURN HERE-FROM-TIMED OU 
70 037520 122777 000377 141744 CMPB #377, JKMAD2 COD: RETURN A "3 yr 
7084 037526 001370 BNE 21S WHEN DONE COMMAND. 
7085 037530 000207 RTS PC ‘ 


7087 037532 000000 GAERR: .WORD O , 330 IF ADDR. LIST OK,=1 IF BAD. 








N14 
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DRLPA.P11 ; WIR ROUTINE TO WAIT FOR "DRLPXO" MICROCODE TO BECOME READY. ‘ SEQ 01982 

7088 

70893 3% 

7090 :*THIS SUB CODE USED TO LOAD MICRO-CODE INTO LPA-11. 

7091 1% CALL = JSR RS, SLOAD 

7092 1 3 .WORD XX ;ADOR. OF MICRO CODE. 

7093 :% *RETURNS HERE 

7034 i NOTE: MICRO CODE FILE MUST END IN -1 DATA. 

70 ‘ 

o0a8 037534 010446 $LOAD: MOV RY, -(SP) ;SAVE RY. 

7098 037536 010046 MOV RO; -(SP) :SAVE RO. 

70939 037540 012500 1$: MOV (53+. RO :GET PROG. ADDR. 

7100 g3754e S077 141720 CLR aKMAdO :C CSR 

7101 0375 S077 141724 CLR aKMADY ‘CLEAR CRAM ADOR 

7102 03735¢ 777 OO02000 141706 2S: BIS #2000, IKMADO :SELECT CRAM. 

7103 75 012077 141716 MOV (0)+, aKMADS :WRITE DATA. 

7104 03756 052777 O20000 141674 BIS #20000,9KMADO SET CRAM WRITE 

7105 037572 005077 141670 CLR aJKMADO :DISABLE CRAM. 

7106 037576 005277 141674 INC aKMADY :UPDATE CRAM ADDR. 

7107 037602 1027 177777 CMP (0), 8-1 :ALL DONE? 

7108 037 1361 BNE 2s : : 

71039 037610 77 141662 CLR aKMADY :CLEAR CRAM ADDR. 

3110 7614 016500 177776 MOV -2(5),RO :GET MICRO CODE ADDR. 

711@ 037620 052777 OO02000 141640 3S: BIS 000, aKMADO ;SELECT CRAM 

7113 037626 022077 141650 CMP (RO)+; JKMADS :DATA OK? 

7114 037632 001013 BNE S$ :NO - REPORT AN ERROR. 

7115 037634 Gei0e7 177777 CMP (0), #1 :ALL DONe? 

7116 7640 14 BEQ 4g :YES - EXIT 

7117 037642 005077 141620 CLR aKMADD :NO - DESeLECT CRAM. 

7118 037646 005277 141624 INC aJKMADY :UPDATE CRAM ADDR. 

e113 037652 000762 BR 3$ 

7le1 037654 012600 4g: MOV (SP)+,RO ;RESTORE RO 

7l22 037656 012604 MOV (SP)+°R4 ?RESTORE RY 

sie 037660 o0020S RTS RS ?EXIT 

7125 037662 S$: ;COME HERE ON LOAD ERROR 

7126 037662 005745 TST -(5) 

7127 037664 105204 INCB RY ;UPDATE ERROR COUNTER. 

7128 037666 100324 BPL 1$ :IF NOT TOO MANY, TRY AGAIN. 

7129 037670 Oo00000 HALT :MICRO CODE LOAD’ ERROR. 

7130 :KMC-11 FAULT. YOU COULD TRY 

7131 037672 000722 BR 1$ :TO PRESS CONTINUE TO GIVE IT 

7132 ?ANOTHER CHANCE, BUT I DOUBT 

7133 :THAT THAT WOULD WORK. SINCE I’VE 

7134 SALREADY GIVEN IT 177 (OCTAL) CHANCES. 

7136 ?TRY RUNNING THE KMC-11 DIAGNOSTIC. 

7137 

7138 ; 

7138 j #THIS ROUTINE ISSUES A WRITE COMMAND TO THE LPA-11 

7141 $x CALL = JSR RS, STLKW 


| 
| 
| 


Bis 
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DRLPA.P11 ; WIR ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. SEQ 0193 
7142 3% .WORD O ;OFFSET OF DEVICE ADOR. 
7143 i -WORD O :DATA TO BE WRITTEN 
7145 037674 0oO1004%6 STLKW: MOV RO 7 (SP) ;SAVE RO 
7146 037676 Gieso0 MOV 55+,R :GET DEVICE OFFSET 
7147 037700 OSe700 O00340 BIS 4340" RO :ADO WRITE CODE. 
214B 7704 004737 O40156 ISR PC, SCP !WAIT FOR FAST PATH READY 
714 7710 010037 O4000e MOV dd 
7150 637714 010077 141556 MOV RO} JKMADY 
7151 7720 112777 OOO0O0S 141544 MOVB #5, JKMADe ; ISSUE_FAST PATH WRITE 
7152 004737 040156 JSR PC’ SLPW ‘WAIT FOR RDY 
7153 0377 011537 040004 MOV (S$, We 
2154 037736 1125 141534 MOVB (5)4, JKMADY ;WRITE LOW BYTE DATA. 
7156 03774 112777 0S 141522 MOVB #5, JKMAD2 ;FP WRITE 
7157 037 4737 O4015 ISR PC, SLPH 
7158 037754 111537 0400 MOVB 
7159 037760 1125 141512 MOVB (2554 3 KmADY ;WRITE HIGH BYTE 
7160 037764 112777 OO000S 141500 MOVB #5, JKMADe 
7161 037772 004737 O40156 JSR PC'S 
7162 037776 012600 MOV (SP)+,RO 
7163 oO40000 O0020S RTS RS ;EXIT DONE. 
7164 oO40002 o00000 Wi: 0 
7165 o40004 o00000 We: 0 
7166 940006 oo00000 W3: 0 
Bt 
5% 
7168 j XTHIS ROUTINE ISSUES A READ COMMAND TO THE LPA-11 
7171 :% CALL = JSR RS,STLKr 
7172 + .WORD O ;OFFSET OF DEVICE 
7173 >RETURNS HERE 
7174 :x0ATA IN WORD SOATR 
“fe a 
7177 040010 o1004%6 $TLKR: MOV RO 5‘ SP) ; SAVE 
7178 O400le 012500 MOV (55+, :GET OFFSET 
7179 O40014 052700 o00300 BIS #300' Ro :ADD_READ CODE 
7180 O40020 004737 O40156 ISR PC, $LPW :WAIT TILL READY 
7181 O40024 110077 141446 MOVB RO; JKMADY 
7182 O40030 112777 Oo000S 141434 MOVB #5; JKMAD2 ; ISSUE WRITE FP 
7183 040036 004737 O40156 JSR PC’ $LPW 
7184 O4004e 010037 O4015e MOV RO;RD1 
7165 o40046 1S: 
7186 O40046 O04S37 oO4O444 ISR RS, STOUT ;-TOUT-CHECK FOR TIMEOUT 
7188 o400S2 104000 ERROR ;/TIME-OUT ERROR 
7189 :/WE FAILED TO COMPLETE 
7190 : “CURRENT OPERATION. 
7191 : “CONTINUES IN THIS LOOP 
213e +/WOULD MAKE US “HANG” HERE 
7194 o400S4 000774 BR 1$ 
7195 
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ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. 


;7RETURNS HERE-FROM-TIMED OUT. 


ooco4o = 141402 git ogrts, , IKMADO ;FAST PATH GOT DATA? 

000004 141376 MOVB #4, JIKMAD2 ; ISSUE FAST PATH READ 

040156 JSR PC, SLPW 

141372 040154 25 MOVB aKMADY, SDATR ;GET LOW BYTE 

040444 , JSR RS, STOUT ;-~TOUT-CHECK FOR TIMEOUT 
ERROR ;“TIME-OUT ERROR 


:/WE FAILED TO COMPLETE 
ERATION 


: CONTINUES IN THIS LOOP 
?/WOULD MAKE US “HANG” HERE 


BR 2s 
; ZRETURNS HERE-FROM-TIMED OUT. 
000040 141342 BIT #B1TS, IKMADO :FAST PATH READY? 
000004 141336 MOVB #4, akMADE ; ISSUE FAST PATH READ 
040156 JSR PC’ $LPW 
141332 o40155 MOVB aKHADS $DATR+1 ;SAVE HIGH BYTE 
nov (SP)+, RO 


RD1: 0 

SDATR: . WORD 0 

THIS ROUTINE WAITS FOR KMC-CODE TO BECOME READY AS WELL 
jAS FAST PATH TO BE READ. 

CALL = JSR PC, SLPW 


;IT WILL TIME OUT IF TOO MUCH TIME IS TAKEN BY 
; THE MICRO-PROCESSORS AND REPORT AN ERROR, THEN HALT. 


SLPH: Mov RL, -(SP) ;SAVE R1 
000377 141302 1S: CPB #377, AKMAD2 ;FINISHED INSTRUCTION? 
INC Rl ; TIME OUT? 
BNE 1 
BR 10S 
o00020 141260 2S: BIT #9174, SKMADO ;FAST PATH READ? 
INC Ri ;NO - TIME OUT? 
BNE 2 
BR 10$ ;YES - REPORT AN ERROR 
3S: MOV (SP)+,R1 ;RESTORE R1 
RTS PC EXIT 


SEQ 0184 
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7eS0 O40e22e 
_ 7254 o40e46 
| 7vess 
eS& o40e4%6 
7eS7 O040eS0 
7eS8 
7eS9 
7260 
7261 
7262 
7263 
7264 
7265S 
7266 
7267 
7268 
7269 
7270 
7e71 
7e7e O40eS2 
7e73 O40e2S4 
7274 
id Sg 040256 
sos Eitees 
7e78 O40266 
7279 +040270 
7280 040274 
7281 O4 
7 04 
72 
7284 040302 
72e8S 040306 
72 040310 
72 a 
7288 
7289 O40 
7290 040324 
72931 
72392 040330 
7293 040332 
7234 mis 
7295 4 
7296 040344 
7297 040346 
7298 
7e99 
7300 
7301 
7302 


10440 
00040 


000000 
000776 


oOo oO 
—_— pe 
mw oo 
N §—O 


ggne 
aes Ae 


8 
ne e 


[=] 
Fe 
GG) 
NN 


8 
88 


"ROUTINE 8 WAIT FOR 


040230 


001514 


oooo00 


040320 


040322 
037674 


000000 
0366S4 
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“DRLPXO” REcRDCOBE 33 BECOME READY. 
10$: 
TYPE 65S ;; TYPE ASCIZ STRING 
B 3 2:GET OVER THE ASCIZ 
-:65$: .ASCIZ <200>s#LPA-11 FAULTS 
64s: 
113: HALT ;LPA-11 FAULT RUN LPA-11 
BR 118 : DIAGNOSTICS. 
-# 
:*THIS ROUTINE PROVIDES THE LINKAGE FROM USER CODE TO 
; #A DEVICE ADDRESS ON THE I/’0 BUSS FOR WRITE ONLY. 
:% FIRST WE WILL DETERMINE IF THE ADDRESS HAS BEEN USED 
5 BEFO eG NOT WE HAVE TO INITIALIZE THE LPA WITH 
:% WHEN THE ADDR. IS KNOWN BY THE LPA, DO THE OUTPUT BY 
3% STLKw 
3% 
SOUTLP: MOV RO,-(SP) ;SAVE RO 
MOV R1;-(SP) :SAVE Ri 
Moy #, OVLS, RO ;PROGRAM DEFINED LIST. 
1S: TST (0) ; TERMINATOR REACHED? 
BEQ 10$ ?YES NEXT STEP. 
CMP a(5), (O)+ :MATCH WITH ADDR IN LIST? 
BEQ 2s 
INC R1 
BR 1$ 
2S: mov RL. 3S ;SAVE OFFSET, DEVICE KNOWN. 
MOV a(5)+,4$ ;GET DATA TO BE WRITTEN 
JSR RS, $TL Ku :DO WRITE 
3$: WORD O :DEVICE OFFSET 
4§: “WORD O :DATA TO BE WRITTEN. 
MOV (SP)+,R1 
MOV (SP)+;RO 
RTS RS 
10$: MOV a(5),(0)+ ;SAVE ADDR. 
CLR (0) 
ISR RS, SLPAI 
. WORD DY 
BR 2s 


;* 
;*THIS ROUTINE PROVIDES THE LINKAGE FROM USER CODE 
;*TO A DEVICE ADDR. ON THE I/70 BUSS FOR READ ONLY. 


eo 
:*#FIRST WE WILL DETERMINE IF THE ADDRESS HAS BEEN 


SEQ 0185 


DRLPA.P 


O4O4S6 
040462 
O4O464 


tale A "heat stax -A 
WIR 


8 
aR 


UG) 
OTLnoo 


00237 


a tT 27(654) 
ROUT INE 


C91514 


000000 


040412 
040010 


0401S4 


000000 
036654 


040500 


040500 
~ '050e 


o40S0e 


13-DEC-77 


1S 


12:58 
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TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. 


SINLP: 


18: 


es: 


$SOFS=. 


3$: 


10$: 


$TOUt: 


18: 


; USED BEFORE IF NOT, WE HAVE TO INITIALIZE THE LPA 
HNEN THE ADDR IS KNOWN WE CAN DO oUTPUT THROUGH 


SEQ 0186 


1% CALL THROUGH MOVEI DATA,ADOR. 
:% WHICH EQUALS: 
1% ISR RS,SINLP 
:% .WORD XxX ADDR OF DEVICE 
2% .WORD YY ADDR TO STORE READ DATA. 
MOV RO,-(SP) ;SAVE RO 
MOV R1,-(SP) ‘SAVE R1 
mov 8, OVLS, RO ;PROG DEFINED ADDR. LIST. 
TST (0) ;EOL REACHED? 
BEQ 10$ :YES - DEFINE NEW ADOR. 
CMP a(S), (O)+ ;ADDR. MATCH? 
BEQ OF 
INC R1 
BR 1$ 
MOV R1,3$ ;SAVE LIST OFFSET 
TST (55+ 
JSR RS,$TLKr ;GO READ DEVICE 
WORD O ;OFFSET OF DEVICE 
MOV SDATR,a(S)+ ;STORE DATA. 
MOV (SP)+,R1 ?RESTORE R1 
MOV (SP)+,RO j RESTORE Re 
RTS RS :EXIT 
MOV acs), (O)+ 
CLR (0) 
JSR RS, SLPAI 
.WORD .DVLS 
BR es 


{xSTOUT ROUTINE ugep TO WATCH IF 
om RE IN_A LOOP TOO-LONG 


p LL=  JSR_RS, STOUT 
i ERROR Xx ;RETURNS HERE ON TIMEOUT 
i ;RETURNS HERE NO ERROR 

CMP RS, SSAD ;SAME ADDR? 

BEQ 1 

MOV RS, S$SAD ;NO-SAVE THIS ADDR. 

cLR scat :CLR CNT AT ADOR. 

INC $CNT ; OVERFLOW? 


DRLPA 


2 ee 


157 
ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. 


tele ae —— et MACY11 27(654) 13-DEC-77_ 12:58 PAGE 


040470 100402 BMI 3$ ; YES-ERROR RETURN 
040472 062705 Jd00004 2s: ADD #4,RS :NO-NOiW ERROR RETURN 
040476 O0020S 3$: RTS RS : RETURN. 

o40S00 000000 $SAD: -WORD OQ pCOnTnis LOOP ADDR. 
o4#o0s0e o0000C SCNT: -WORD O ;# OF TIMES AT ADDR. 


i THIS ROUTINE REPLACES WHAT THE USER WOULD ORY TRAIL ¥ 
; XUSE FOR A RESET. FIRST,WE DO A RESET INSTRUCTION. 
;*THEN WE CLR “.DVLST” WHICH FORCES US TO RESET BOTH THE 
5 XKMC AND DMC AS SOON AS A DEVICE IS REFERENCED. 


ty CALL=JSR SRESET ;REPLACES “RESET INSTRUCTION 
i ; RETURNS PotRe 
o40S04 oo000S SRESET: RESET ;RESET THE WORLD. 
:% MOV 22$,1$ ;/READ DEVICE REG 2$,PUT DATA IN 1S. 
040516 005737 037532 TST $SAERR ;IF NO ERROR, LOOP 
O40S22e 001004 BNE 10$ ? THERE WAS A AA ERROR. 
040524 062737 ooo002 o40S40 ADD #2, 25 ; UPDATE DEVICE A R. 
U SEE HAVE TO PROTECT OUR SELF! 
‘Tp U8 CONTAINED A VALID ADDR, WE 
:MUST KEEP TRYING UNTIL WE GENERATE 
!A@N INVALID ADOR. 
040S32 000764 BR SRESET 
040534 10S: 
040534 000207 RTS PC 
040536 o00000 iS: .WORD O ; JUNK LOC. 
040540 160000 es: ‘WORD 160000 : DUMB ADDR. FORCES INIT OF OMC/KMC. 
?SDELAY- ROUTINE TO GIVE A MINOR DELAY. 
: IS NOT TIME DEPENDENT CODE SENCE 
: NOT USED TO GET SPECIFIC TIME BUT 
: JUST A LITTLE DELAY. 
; THAT IS UNLESS A REAL TIME CLOCK IS PRESENT! 
: THEN WE’LL GENERATE A TIME BETWEEN 16MS TO 32 MS 
: CALL= JSR PC, SDELAY 
o4os4e SDELAY: 
O40S42 005737 oO40624 TST RTCCSR ;CLOCK PRESENT? 
O4NS46 10001 BPL 10$ 
O405S0 012737 oo0002 040614 MOV #2, TIME 
040556 052777 OO01iS odo00040 BIS #115, IRTCCSR ;START CLOCK 
040564 005037 177776 CLR PS 
040570 005737 O40614 1S: TST TIME 
05 001375 BN 


040574 E 1 
040576 005077 000022 CLR @RTCCSR ;STOP CLOCK 


SEQ 0187 





MAINDEC -11- ~s 
WIR 


ORLPA.P11 


040602 
7415 b4pe10 
mie Gaoele 
7418 040614 


7420 040616 
74el O4062e 
040624 


7458 040736 


7464 040762 
7465 040762 


005037 


104401 
000405 


108777 


MACY 11 


™40614 


040614 


o40S4e 


140S4e 
140S42 


001514 
040750 


140156 


27(6S4) PAGE 158 
ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO bECOME READY. 


140632 


040700 
001772 


040700 


140556 


G1S 


13-DEC-77_ 12:58 


10$: 


TIME: 
CLKINT: 
RTCCSR: 


SRESET: 
18: 


93: 
10$: 


es: 


SUTK: 
21s: 
;6S$: 


bag: 
1$: 


. WORD 0 ;CLOCK CSR IF USED. 


 SRESET WILL RESET WHOLE LPA SYSTEM. WITH USER MICRO-CODE. 
;CALL= JSR PC,SRESET 


é1s #BIT14, JKMADO ;SET INIT BIT 
MOV #100. ,R 

JSR PC, SDELAY ; DELAY 
DEC RO 
BNE 1$ 

MOV #MMAST, 10S 

CMPB #’M, SVERSN 

BEQ 

MOV #OMAST, 10S 

ISR RS, $SLOAD ;RELOAD MICRO CODE. 
WORD MMAST :CURREN VERSION. 
MOV #B1T1S!BIT11, IKMADO ;START KMC. 
MOV #5. ,R 
ISR PC, SDELAY 
DEC RO 
BNE 2s 
CLR aKMAD2 
CLR aKMADY 
RTS PC 

SSTHIS MACRO ALLOWS THE OPERATOR TO TALK TO 

Y¥ DEVICE ON Ss 


TH 
; #USER MUST Stent AT THIS ADDR 
;* a i aaa "E"" FOR EXAMINE, OR “D” FOR DEPOSIT. 


; EFAUL 
;*#NEXT, HE MUST SUPPLY AN ADDR. 
;*#NOTE IF ADDR. IS NOT FOUND ON I70 BUS, A HALT 
;*WILL OCCUR. 
CLR -OVLS 
TYPE 6S$ ;; TYPE ASCIZ 
B 4 ;;GET OVER T 
-ASCIZ <200>8E OR D?8 
TSTB a$STKS 


STRING 
HE ASCIZ 


SEQ 0188 
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DRLPA.P11 ; WIR ROUTINE TO WAIT FOR “DRLPXO” MICROCODE TO BECOME READY. SEQ 0189 
7468 ? 10937 BPL 1$ 
74 ? 17 234 4y01se 041112 MOV aSTKB, 20S ;GET INPUT 
7468 7? 4111 TYPE, 20S ‘ECHO NEXT resent. 
7469 1 142737 000240 041112 BICB #240, 20S ;STRIE PAR Lc 
7470 1010 1044 Q DOCT GET 
7471 idle 0126 041110 MOV (SP)+, 14S 
7472 O41016 123727 O41lle ooo0104 CMPB 20S, #'D ; DEPOSIT? 
oue3 041024 OO1411 BEQ 10$ 
} 
7475 041026 004537 940350 JSR RS, SINLP ;GET DATA 
76 041032 041110 2S: .WORD 148 
oaee 041034 041046 [WORD 5S 
7479 041036 013746 041046 MOV S$, -(SP) ; SAVE S$ FOR TYPEOUT 
7480 O41042 i0440e TYPOC : GO. TYPE--OCTAL ASCII(ALL DIGITS) 
748 O4 1044 000736 BR e1$ '200 
o48 1046 0000 SS: . WORD 
7484 041050 10S: 
7485 O41050 104401 041056 TYPE 67$ ;; TYPE ASCIZ STRING 
74 041054 O00404 BR 66S ::GET OVER THE ASCIZ 
74 --67$: .ASCIZ <200>#DATA= # 
7488 041066 665: 
7489 O41066 104412 RDOCT 
7430 041070 612637 041106 MOV (SP)+, 13% 
7492 041074 004537 o402es52 11S: JSR RS, SOUTLP ;OUTPUT ROLITINE. 
7493 041100 041110 12$: WORD 14% ; DEVICE ADDR. 
7494 041102 1106 “WORD 13% :DATA 
ogo 041104 0716 21$ 
7497 041106 oO00000 13$: .WORD OQ 
7498 041110 9do0000 14S: ‘WORD. O 
7499 O4llle 100001 o4eS04 oO44526 20S: "ASCIZ <1><200> "DEVICE ADDR= # 
7500 O41120 O42503 O40440 042104 
7501 O41126 O36522 oo00040 
7502 EVEN 
7503 
7504 
cebe 
7507 THIS ROUTINE LOOKS THROUGH CURENT .DVLS FOR A/D ADDR. 
7508 ; IF UNF OUND +GENERAT ATES IT. THIS ROUTINE’S WHOLE PURPOSE IS 
7509 TO Tr up t R PROGRAM TO LINK TO FILE “DRLPXe” FOR 
7510 SAMPLE AKE ING fReoceS. 
7511 : TO TAKE SAMPLES, . THE USER PROGRAM MUST SET UP 
7512 : A/D csr in BSEL’4, AN 
7513 : (2) HE MUST CALL THIS ROUTINE: 
7514 : TS :CALL SET UP ROUTINE. 
7515 : D DOR. OF AVD C 
7516 : RETURNS HERE sKiNG BSEL 4.6.7 PERMINENTLY SET UP 
opi? : UNTILL one DOES A RESET) 
7519 : (3) THE USER MUST PUT poe O06 INTO KMC REG 2 TO 
| 
| 
| 





I1S 
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DRLPA.P11 WIR ROUT INE TO wAIT FOR “DRLPXO” MICROCODE TO BECOME READY. SEQ 0190 
7520 ; START CONVERSION CAUITION*DO WITH MOVB INSTR. ! 
7521 : (4)MONITOR KMC REG 2 FOR, CODE 377 (DRLPX2 IS DONE) 
75202 : (S)READ KMC RE S FOR A/D RESULT. 
7523 : (6) TO TAKE MORE 7A MPLES SIMPLY PUT A/D CSR INTO 
ce 4 : BSEL 4,5 AND CODE & INTO BSEL 2. 
7526 O41132 012537 oO41142 $PUTS: MOV {sz 1$ ;GET ADDR OF ADDR. OF A/D 
7527 041136 004537 040350 JSR 5,$SiNLP 
041142 00 1$: . WORD Bo 
7509 O41144 04124 “WORD 10% 
7530 O41146 113777 O4O412 140326 MOVB Sor, JKMADE 
7531 O41154 113777 O4O41l2e 140322 MOVB SOFS’ JKMAD? 
7532 041162 013737 O41142 O4le0e MOV 1$,2$ 
7533 11 062737 O00002 041202 ADD #2) 25 
7534 041176 004537 040350 ISR RS; SINLP 
7535 041202 900000 2S: WORD O 
7526 041204 041240 “WORD 10 
7537 041206 113777 O40412 140230 MOVB SOF s , IKMADS 
7538 1ei4 152777 000340 140260 BISB #340; JKMAD 
7539 O4lee2e 152777 000300 140254 BISB #300; JKMAD7 
7540 O4ie30 152777 000300 140236 BISB #300; JKMAD3 
7541 041236 O00eUs RTS RS 
7o4e 041240 ogo0000 10$: .WORD O 
cpus .SBTTL TRAP DECODER 
7546 LTHIS ROUTING HILL PICKUP THE LOWER BYTE OF THE "TRAP" INSTRUCTL 
7547 {ATHIS ROUT INE WILL PICKUP THE THOWER BYTE OF THE “TRAP” INSTRUCTION 
7548 *AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
7549 i xOF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
7550 *GO TO THAT ROUTINE. 
75 041242 oO10046 STRAP: MOV RO,-(SP) ; SAVE_RO 
7553 O41244 016600 oODD002 MOV 2($P),RO EGET TRAP ADDRESS 
7554 041250 005740 TST -(RO)’ : ! BACKUP BY 2 
7555 O4le52 111000 MOVB (RO), RO :!GET RIGHT BYTE OF TRAP 
7556 041254 006300 ASL RO j ;POSITION FOR INDEXING 
7557 041256 016000 041276 MOV $TRPAD(RO),RO : INDEX 10 TABLE 
7558 O41e62 o00200 RTS RO ::G¢ TO ROUTINE 
7560 
7ob1 ;;THIS IS USE TO HANDLE THE “GETPRI” MACRO 
7563 041264 011646 $TRAP2: MOV (SP), -(SP) MOVE THE PC DOWN 
7564 041266 016666 oO00004 oDD0002 MOV 4(SP5,2(SP) MOVE THE PSW DOWN 
7565 041274 o00002 RTI :?RESTORE THE PSW 
7567 .SBTTL TRAP TABLE 
7569 ;*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
7570 :*BY THE “TRAP” INSTRUCTION. 
7572 ; ROUTINE 
7573 5  eeeer= 


MA INDE 
DRLPA. 


7611 


7622 


C -1ll- ORL 
Pll 


Re BP 


ESS inves 
ee SEER 


wm WSL freee 
CT Mennr TMOLVO 


£££ £65655 ££6££ £L£555 


29222 22999 22992 S9222229 22922999 299 
S8ayy FBR 


RT el ed ed ee ed ed ed nd nd yy yy YY YO YOY Oy ey 


PA-A 


MACY 11 


TRAP TABLE 


041264 


031240 
032346 
032276 


033334 


104401 
000410 


000402 


011046 


000761 


041332 


OS6246 
041372 


006020 
041430 


O414S4 


041470 


27(654) 
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RBUFR: 


STYPDS 
SGTSWR 
SCKSWR 


SRDOCT 


J1iS 
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:} GACL=TYPON 
:} GaLL=TYPDS 


; ;CALL=GTSWR 
; ; CALL=CKSWR 
; ; CALL=RDCHR 


: : CALL=RDLIN 
:: CALL=RDOCT 


TRAP+1 (104401) 
TRAP+2( 104402) 
TRAP+3( 104403) 
TRAP+4( 104404) 
TRAP+S( 104405) 


TRAP+6 ( 104406 ) 


TRAP+7 ( 104407 ) 

TRAP+10( 104410) 
TRAP+11¢ 104411) 
TRAP+12¢( 104412) 


SEQ 0191 


TTY TYPEQUT ROUTINE 

TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
TYPE OCTAL NUMBER (NO LEADING ZEROS) 
TYPE OCTAL NUMBER (AS PER LAST CALL) 
TYPE DECIMAL NUMBER (WITH SIGN) 


GET SOFT-SWR SETTING 


TESt_FOR CHANGE IN SOFT-SWR 
TTY TYPEIN CHARACTER ROUTINE 
TTY TYPEIN STRING ROUTINE 
READ AN OCTAL NUMBER FROM TTY 


;ROUTINE TO READ NUMBERS FROM A BUFFER 


6S$ 


4$ 
<200> BUFFER STA 


(SP)+,RO 
#BUFFER, RO 
67S 

6$ 

WCHAN INC? # 


Ye 
#16.,R1 
69S 

8s 

<200> #ADOR. 


715 

os 
<200> #8 
RO, -(SP) 


225 
s & 


(0),-(SP) 


TYPOC 
ADD R1,RO 
BR 3S 


3; TYPE ASCIZ STRING 
Mei OVER THE ASCIZ 


;; TYPE ASCIZ STRING 
;;GET OVER THE ASCIZ 


3; TYPE ASCIZ STRING 
-:GET OVER THE ASCIZ 


paths 


3; TYPE ASCIZ STRING 
;;GET OVER THE ASCIZ 


;;SAVE RO FOR TYPEOUT 
::G0 TYPE--OCTAL ASCII(ALL DIGITS) 
:iTYPE ASCIZ STRING 
!iGET OVER THE ASCIZ 


;;SAVE (0) FOR TYPEOUT 
;;GO TYPE--OCTAL ASCII(ALL DIGITS) 
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DRLPA. TRAP TABLE 
7628 
7629 
7630 O41S504 O4%6200 O40S2e0 O40440 
7631 Bu take 042104 O4eSee 051523 
7632 1$e0 O4e44O OSilee 051117 
ae 041526 ooo 
7635 041527 200 O50114 Od20101 
76 pat eg 041515 O30455 
763 1S4e 4461 O4e040 052101 
7638 041550 020101 051105 O47See 
fe28 O41SS6 O00lee 
7641 O41560 O46200 O40S20 024040 
7642 11268 046513 026503 030461 
7643 041574 QO20051 O47111 OSele3 
7644 041602 OSeSee 052103 047511 
7645 041610 Babi ks 051105 O047See 
cous 041616 lee 
7648 O41620 O46200 O04 024040 
7649 O416e6 O3411S O3e46e ODet464 
7650 O41634 O4444O O44516 Oe0le4 
peas 041642 051105 O47See O001ee 
7653 O416S0 046200 02404 
7654 O41656 034115 O3e4%6e Oe4464 
7655 ta Roig 046111 020117 
7656 1672 OSO4 OY 440 
cope 041700 OSil2e 051117 ooo 
7689 1705 $0114 O20101 
7660 Bui sie 64 031070 B52055 
7661 041720 1 040506 OSele3 
7662 O4172e6 O50040 052101 020110 
7663 041734 O40504 O40Se4 O42e440 
pebe O41742 OSllee 051117 000 
7666 a Cash 2 114 020101 
7667 1754 O4O4 O4S461 
7668 041762 O20051 051503 O20lee 
7e63 041770 051105 O47Se2 O00l1ee 
7671 O41776 OY 040Se0 O2e4O40 
7672 O4e004 pe3e75 030461 024513 
7673 O4eOle O8144O OSl1e3 O42440 
A gens 042020 OSll2e 051117 000 
7676 20eS 200 950114 020101 
7677 e032 O4e0S0 O30See O45461 
7676 OYe04O0 020051 051105 O47See 
4 Ye | O4e046 000122 
7681 O4e20SO O46200 O40S20 de4040 


13-DEC-77 


EM1L: 


EMe: 


EM3: 


EM4: 


EM6: 


EM?: 


EM10: 


EM11: 


EMle: 


EM14: 


K1S 
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-SBTTL 
-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 


-ASCIZ 


.ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


<200> #LPA 


<200> #LPA 


<200> &#LPA 


<200> #LPA 


<200> #LPA 


<200> #LPA 


<200> #LPA 


<200> #LPA 


<200> #LPA 


SE@ 0192 


.ASCIZ MESSAGES. 
<200>#LPA ADDRESS ERRORS 


(KMC-11) DATA ERRORS& 


(KMC-11) INSTRUCTION ERROR#& 


(MB2S4) 


(M82S4 ) 


(MB2S4) 


(AD11K) 


(KW11K) 


(DR11K) 


INIT ERROR# 


SILO DATA ERROR# 


FAST PATH DATA ERROR# 


CSR ERROR# 


CSR ERROR# 


ERROR# 


(AA-11K) ERROR#® 
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DRLPA.P11 -ASCIZ MESSAGES. 


768e O42056 O40S01 O3045S O45461 
05110S O047See 


76 74 62 20 Oe4o4O EMIS: -ASCIZ <200>8LPA (AR11) ERROR# 
ree? Qusios Ostio; Osose1 Oe00si 
7688 O4e2110 051105 O47See O0012e 


7690 Os} 46 et O0a80 pe ge EM16: -ASCIZ <200>#LPA (LPS-11) ERROR# 


7692 OY4el32 020051 051105 O47See 


SEQ 0193 


EM17: -ASCIZ <200>#LPA-11 FUNCTIONAL ERROR# 


7701 tee 200 O4eSee O4eS20 EMeD: -ASCIZ <200>#REPEATIBILITY OR CHAN AVERAGE ERRORS 
OYee00 OS2101 O4111 


OO 

erat 
~ 
o 
~ 
— 


Rnom 
oO 
<= 
Ww 
wi 
Oo 
-_ 


ONL SEO DH1: -ASCIZ <200>8ERRPC ADDRESS# 


re 

4 

NY 

8 

= 

a 
Ren RAL 


—- mee 
R Bon 


_ 


OS0le2 DHe: .ASCIZ <200>#ERRPC EXP’ED REC’ED# 


z 
2 
BRR? 
Bo 
is 
ERR 
Z 


NNNNN 
NNNNN 

BR 

Oo 

<= 

fu 

<£ 

<= 

N 


WOnNOU CW 
ze 
So 
Be 
22 


042312 oven OSi12e2 041520 OH3: -ASCIZ <200> #ERRPC# 
00 051105 OS50122 OH17: -ASCIZ <200>s8ERRPC TESTNO EXP’ED REC’ED# 


SA 
tu 
Oo 
4 
tT 
WwW 
8 


NN 
NN 
tur 
Wr 
ee 
La") 
1) 
2 
a 
oO 
———FU 


<= 


RNB 
R28 
pts 
2 
~ 


5 
; 
: 


05 24 ney A53 DHe0: -ASCIZ <200>#TEST S/B CHAN HIGH LOWS 
rf 020040 


22 

roru 

ts 
BERR FRE 


020116 
043S11 
046040 
051108 OSOlee Dkel: -ASCIZ <200>#ERRPC TSTNO USJNO USRDA ALPCO ALPCI- ALPSOs 


N 
N“N 
Wa 
W 
4 
tT 
<= 
_ 
o 
oO 
ru 
BNGdaNG 
Oo 
au) 
Oo 
oO 
£ 
oO 
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DRLPA.P11 
7736 042434 020103 
7737 ey42 0471 
7738 2450 O51 
7739 2456 020040 
7740 4 02010 
7741 O4e472 O415 
7742 0425 O46101 
7743 «O04 Oo40 
7744 042514 00011 
7745 
7746 
aint 042516 001116 
7749 O42524 001116 
2780 042532 000000 
278s 34 OO111 
77 gusea5 weet 
7754 O4e546 001126 
ooer ues > 

1 
rey BESEG ORED2 
5528 O42566 001116 
7760 042574 001770 
7761 O42 001766 
o7be 042606 000000 
7764 O42612 O20040 
7765 
7766 
fe BSE et 
77 
fi at 
7771 4y i 
7772 2652 043040 
7773 
7774 
7775 o4 
7776 042700 O04 
9777 2706 O20114 
7778 O4e714 
7779 7 aig 
7780 7 204 
7781 7 4 
7782 O42744 OSile2 
7783 27S2 047504 
r7e4 Buses 0S21 ig 
ooee pusve? 8 
7787 042774 oO41Si1 
7788 043002 051117 
7789 043010 oO445e4 
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EVEN 
. WORD 


. WORD 


- WORD 
. WORD 


15 


SERRPC, KMADO, 0 
SERRPC , SGDDAT , SBDDAT , O 


SERREK» O 
SERrPC, STESTN, SGDDAT , SBDDAT ,O 


STEStN, AVEXP, CHAN, RHIGH, RLOW,O 


SERRPC, STESTN, USJNO, ALPADL,ALPCO,ALPCI,ALPSO,O 


. WORD 
-ASCIZ 


-ASCITI 


-ASCIT 


-ASCIZ 


0,0 
s 8 


<«200>"MAKE YOUR OWN JOB(S) ROUTINE FOR LPA-11" 


<200>"PLEASE ANSWER ALL QUESTIONS, IF IN DOUbT, REFERR TO DOCUMENTATION” 


8 


<200><200>"DEDICTED OR MULTIUSER (D OR M)” 





SEQ 0194 


MAINDEC -11- DRLPA-A MACY11 27(654) 13-DEC-77 12:58 PAGE 16S 
DRLPA.P11 -ASCIZ MESSAGES. 


7790 043016 Oe4040 DEOL? 051117 
000081 


SEQ 0195 


os OS2i0S O4144O Me: -ASCIZ <200>"SET CLOCK CSR= ” 
7794 043036 7514 O45S503 041440 


7795 043044 OS1123 020075 ooo 
7797 043051 200 042523 020124 M2: .ASCIZ <200"SET PRESENT BUFFER (2°S COMP) TO ” 
7798 043056 051120 051505 047105 

7739 043064 Oe01e4 Ose602 043106 

7800 043072 051105 OP4040 O2346e2 

7801 043100 O20123 047503 050115 

702 043106 20051 47524 d00040 

7804 O43114 O44200 053517 O46440 MY: -ASCIZ <200>"HOW MANY JOBS “ 

7805 043122 O47101 O20131 O47S1i2 = * 

7806 043130 OS1S02 00040 

7808 043134 O4S200 041117 O21440 MS: .ASCIZ <200>"J0B & “ 

7809 043142 900040 

F810 O43144 OS144Q O4OS24 OSIS24 Ne: .ASCIZ ™ STATS:” 

7e12 043154 7457 42040 N7: .ASCIZ <200>"I/0 DEVICE START MODE WORD= “ 
7813 043162 1 1511 105 

7B14 0431 1e3 051101 Oe01e4 

PBS 043176 ON7SIS OY 053440 

7816 043204 051117 036504 OO0040 i 
re17 Ouse1e O41 O43125 42508 MB: -ASCIZ <200>"BUFFER SIZE (2°S COMP)= 
7818 0 4523 O4e53e2 

7819 043036 O23462 920123 

7820 043234 04 115 0364 

7821 O43e42 O00040 é 
s8ce Ousedd 052600 Oyese9 Oen1Z2 M9: .ASCIZ <200>"USER STATUS WORD ADDR= * 
7823 O04 05212 101 051525 | 

7824 043 40 051117 O20104 

pees 043266 O¥2101 051104 020075 - . 

pes? Buasce B00 047510 020127 M97: ASCII. <200>"HOW MANY TIMES TO FILL BUFFERS (NORM =1) “ 
7828 043302 040515 054516 O52040 

7829 043310 O46511 051505 O52040 

7830 043316 O20117 O44S06 046114 

7e31 04 O41 043125 O42506 

7e33 043340 ONeeSS O5e440 Oeduel 

7834 043346 040 

7835 043347 200 O47510 OP0127 M10:  .ASCIZ <200>"HOW MANY BUFFERS ? ” 

7e3e 043354 O41 4516 041040 

783 3362 042165 0426 

7838 370 03744 

7833 043374 O44600 Oe0i23 O42504 M11:  .ASCIZ <200>"IS DEVICE OVERRUN FATAL?” 
7840 O43402 O44S26 O42503 047440 

7841 O43410 O42 051122 047125 


0434 O42eSe6 
7842 O43416 O43040 052101 O46101 


16 
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DRLPA.P11 .ASCIZ MESSAGES. SEQ 0196 
7844 3426 4600 O2012e3 OSe50e Mie: -ASCIZ <200>"IS BUFFER OVERRUN FATAL?” 
Seue Q4sus4 O4SIOe 51105 o47440 

7846 O43442 O04 OSilee O4712 

7e47 043450 OM 052101 046101 

ra4s OM B94600 OS1S16 043125 M13:  .ASCIZ <200)"INSUFFIENT CORE FOR BUFFERS-RETYPE THIS JOBS PRAMETERS”™ 
2850 66 7105 20124 

7851 043040 

2 1117 41040 Quai25 

Pesu O43616 osei0s Ostia: 2010s 

7855 04 Baaies Geleii G4S040 

7856 0435 1117 O2g1e3 051120 

Feee Biase begs ORElep tetlos 

7855 O43551 200 42504 OYOSIY M4: — .ASCIZ <200)"DELAY BEFORE START 

7861 043564 Oaeeze s1iH0 40524 

oee3 Bagee 356 48 041115 Mis: -ASCIZ <200>"NUMBER OF CHNNELS?” 

7864 O43602 051105 04 020106 

FBS 043610 44103 O4711 046105 

7867 043621 14 OS2eies Mlb: -ASCIZ <200>"LIST RANDOM CHANNELS” 
7B68 04362 051040 047101 047504 

7869 043634 00115 O44IG3 047101 

7870 O43642 042516 051514 — 000 

7a71 04364 3 OSO1IS M17: — .ASCIZ <200>"SANPLES” 

7872 O43654 O42514 : 

ca Les iaeee S01 BE01 0S M18: -ASCIZ <200>"MAKE BUFFER NOW? 

7875 043674 04 1? 0B0072 

7876 043702 O47 O47440 MO: -ASCIZ <200>”"NEW OR OLD DATA?” 

7877 043710 O201 117 020104 

7878 043716 O04 o40524 0000 ‘ : 
A Le pias bushi pales M19: -ASCIZ <200>"PRESS CONTINUE WHEN READY 
reel 043740 Osesi6 20105 Oy41e 

7882 043746 047105 OS1040 040505 

7883 043754 054504 — OOO i 

7884 043757 — 200 O44103 047101 M20:  .ASCIZ <200>"CHAN ADDRESS WORD? 

7885 043764 O4O44O O42104 O4eS22 

ree 043772 Osise3 OS3440 051117 

7887 O44000 | . 

7888 044003 en 046103 O41517 Mel: -ASCIZ <200>"CLOCK RATE? 

7889 O44010 O20113 O40Se2 O425e4 

7e91 44026 051600 040s 2122 Mee ASCIZ <200>"START/EVENT MARK WORD? ™ 
Fase Ou4dee ouede? Dycese OeSl 16 

7893 O44034 O46440 051101 O20113 

7894 O44042 047527 O42l2e2 020077 

7895 O440 000 

7896 O44051 200 OS2123 051101 M23: .ASCIZ <200>"START MASK? * 

7897 O44056 O20le4 O40SI15 045523 
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ae 04411 


-ASCIZ 

020077 000 
200 053105 
020124 O40515 


046440 OS1S01 
000040 


MACY11 27(654) 
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13-DEC-77 12:58 PAGE 167 


04710S Me4: 


O4SS2e 
037513 


. EVEN 


-ASCIZ 


<200>"EVENT MARK MASK? ™ 


SES 0197 


MAINDEC -11i- DRLPA-A 
DRLPA.P11 


lle 000000 
044114 Q000000 
116 000000 


0S4130 co0000 
OS4132e o0001e 


0001 


000040 
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-ASCIZ MESSAGES. 


ie REAES! Pun a ARRAY FOR THE KW-11K CLOCK 
HIS TABLE WILL BE oo BY THIS PROGRAM 


i AND BY THE mA oP 5ON. 
KWT: word 0 CLOCK ST MODE WORD. 
WORD O :CLOCK PRESET REGISTER. 
.WORD O ‘CLOCK BUFFER REGISTER. 
DEVLST: .WORD O MODE WORD FOR START. 
aa -BLKW 10. TEN ADDRESSES ON START. 
“TITLE OMDT 
“SBTTL DMDT -- DEDICATED MODE DISPATCH TABLE 
IDENT /LPA.03/ 


COPYRIGHT 1976, 1977 DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 


ONA StNGLE CORBUTER averen anB CAN BE cOnTED CutTH INCLUSION 


OF DIG TALS COPYRIGH OR USE INS 
EXCEPT AS MAY OTHERWISE "BE TBROVIDED IN WRITING BY DIGITAL. 


THE INFORMATION eo Ma DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND FO ton = CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF 
ITS SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


CHARLES A. at’ BUGLSON 

FEBRUARY 4, 

+ 

DMDT_-- DEDICATED MODE DISPATCH Mate 

TABLE FOR LPA11 MICRO PROCESSOR DEDICATED MODE SAMPLING 


; DEFINED VALUES 


bwostz= =18. s LENGTH OF DOMOT BUFFER IN BYTES 

qs ‘SLAVE DISPATCH T START A 

Bier e i SHAN ul L Ap Ore? Rel RTER Bootes BYTE 

SEX=120 jSELECT L EXTERNAL C : ART T_BND INTERRUPT ENABLE 
ecRed iCEBAR AD ouTaY feNebcHt Fi 

RONPRL =235 tCEGUEST? OUTPUT NPR LOW BYTE IN MICRO-PROCESSOR 
ADIDRL= RDC 8 & DATA REGISTER ADDRESS LOW BYTE 

RINPR=1 INPUT 

SCS=40 iad cl beK OVERFLOW START FOR ADC’S 

AD2SRL=40 !ADC #2 STATUS REGISTER ADDRESS LOW BYTE 


SEQ 0198 


DMOT 


DRLPA.P1 


MACY 11 
1 


fee Feros 


a 
mv 
=O 

N 


054353 
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DMDT -- DEDICATED MODE DISPATCH TABLE 


ooo04e AD2DRL=42 
000001 D1SRH=1 
000041 AD2SRH=41 
000020 SEN=20 
OMDT: 
D.OES 
162 000 120 . BYTE 
035 002 o1s 
000 235 100 
oS4e01 .=D.0ES+23 
0.O0EQ:: 
162 000 000 .BYTE 
120 035 002 
01s 000 
100 
000 .BYTE 
os42e4 .=0.0EQ+23 
D.OCS:: 
162 000 040 . BYTE 
035 002 01S 
000 235 00 
054247 .=D.0CS+23 
D.OCQ:: 
162 000 000 . BYTE 


040 035 002 
015 000 235 
100 - 
000 .BYTE 
0S427e2 “sree 
162 000 120 -BYTE 
035 002 015 
00 235 110 
040 120 035 .BYTE 
O42 015 000 
235 100 
054315 My ne tee 
162 000 000 - BYTE 
120 035 002 
01S 000 235 
111 000 040 . BYTE 
120 035 O04 
01s 000 235 
100 
054340 a ese eres 
262 000 040 .BYTE 
035 002 01s 
000 235 
110 040 040 -BYTE 
035 O42 015 


E16 


;ADC #2 DATA REGISTER ADDRESS LOW BYTE 

;ADC #1 STATUS REGSITER H 

;ADC #2 STATUS REGI E RESS 
;SELECT EXTERNAL START, NO INTERRUPT ENABLE 


-ONE ADC, EXTERNAL TRIGGER, SINGLE CHANNEL 
DMDS12+<3#4O> , ADISRL, SEX, RONPR, ADIORL, RINPR, CLR, RONPRL , SDT 


“ONE ADC, EXTERNAL TRIGGER, SEQUENTIAL CHANNEL 
DMDS12+<3#4O> , CAINC, ADISRL, SEX, RONPR, ADLORL, RINPR, CLR, RONPRL, SDT 


CAINC 


-ONE ADC, CLOCK TRIGGER, SINGLE CHANNEL 
DMDSI2+<3%40> , ADISRL, SCS, RONPR, ADIORL, RINPR, CLR, RONPRL , SDT 


-ONE ADC, CLOCK TRIGGER, SEQUENTIAL CHANNEL 
DMDSI2+<3*40> , CAINC, ADISRL, SCS, RONPR, ADLORL ,RINPR, CLR, RONPRL , SDT 


CAINC 
-TWO ADC, EXTERNAL TRIGGER, SINGLE CHANNEL 
DMDS12+<3*40> , ADISRL, SEX, RONPR, ADLORL, RINPR, CLR, RONPRL , SDT+10 


AD2SRL , SEX, RONPR, AD2DRL , RINPR, CLR, RONPRL , SOT 


-TWO ADC, EXTERNAL TRIGGER, SEQUENTIAL CHANNEL 
DMDS12+<3#40> , CALNC, ADISRL, SEX, RONPR, ADLORL, RINPR, CLR, RONPRL 


SDT+11,CAINC, AD2SRL, SEX, RONPR, AD2DRL , RINPR, CLR, RONPRL , SDT 
-TWO ADC, CLOCK TRIGGER, SINGLE CHANNEL 
DMDSIZ+<5#40> , ADISRL, SCS, RONPR,ADLORL, RINPR, CLR, RONPRL 


SOT+10,AD2SRL,SCS,RONPR, AD2DRL,RINPR,CLR,RONPRL , SOT 


SE@ 0199 


F16 
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DRLPA.P11 DMDT -- DEDICATED MODE DISPATCH TABLE SEQ 0200 
8013 o54356 000 235 100 
8014 054363 .=0.TCS+23 
8015 054363 0. TCQ:: -TWO ADC, CLOCK TRIGGER, SEQUENTIAL CHANNEL 
B01 954363 262 000 000 -BYTE DMDSIZ+<5#40>, CAINC, ADISRL, SCS, RONPR, ADLORL ,RINPR, CLR, RONPRL 
8017 054366 O40 035 002 
8018 054371 ois 000 235 
8019 054374 111 000 040 -BYTE SDT+11,CAINC,AD2SRL,SCS,RONPR, AD2DRL,RINPR, CLR, RONPRL , SDT 
8020 054377 040 035 O42 
8021 054402 01s 000 235 
8022 O5440S 100 
8023 os4406 .=0. TCQ+23 
Boss ; PARALLEL MODE TABLE 
8027 o54406 b.TESP:: -TWO ADC, EXTERNAL TRIGGER, SINGLE, PARALLES 
8028 OS4406 O22 120 000 -BYTE DMDSIZ+<O*40>, SEX, ADISRL, RONPR, AD2SRL , SEN, RONPR, ADIDRL , RINPR 
4411 035 040 020 
80 4414 035 oo2 ois 
8031 054417 o42 015 001 .BYTE AD2DRL,RINPR,ADISRH, RONPRL , AD2SRH, RONPRL , SDT+6 
8032 O54422 235 041 235 
8033 106 
8034 054431 .=D. TESP+23 
8035 054431 Db. TEQP: : -TWO ADC, EXTERNAL TRIGGER, SEQUENTIAL, PARALLEL 
8036 054431 O22 120 000 -BYTE OMDSIZ+<O#40>,SEX,ADISRL, RONPR, AD2SRL , SEN, RONPR, CAINC, ADLDRL 
8037 054434 035 O40 020 
8038 054437 035 000 ode 
8039 o54442 015 O42 01S .BYTE RINPR,AD2DRL,RINPR,ADISRH, RONPRL , AD2SRH, RONPRL , SDT+6 
40 OS4445 001 235 041 
8041 O54450 235 106 
go42 os4454 .=0. TEQP+23 
8043 os44s4 Ne) tt CLOCK TRIGGER, SINGLE, PARALLEL 


. TCSP: : ;TWO ADC 
4454 222 o40 000 -BYTE DMDSIZ+<4#40> , SCS, ADISRL, RONPR, AD2SRL, SCS, RONPR, ADIDRL,RINPR 


8047 OS446ES O42 015 001 -BYTE AD2DRL,RINPR,ADISRH, RONPRL ,AD2SRH, RONPRL , SOT+6 

054470 235 O41 235 
8049 054473 106 

0S4477 .=D. TCSP+23 

8051 OS4477 D.TCQP:: ;TWO ADC, CLOCK TRIGGER, SEQUENTIAL, PARALLEL 

054477 222 040 000 -BYTE DMDSIZ+<4*40>,S5C5,ADISRL, RONPR, AD2SRL, SCS, RONPR, CAINC, ADIDRL 
Sie mB 
80SS 054510 01S O42 01S -BYTE RINPR,AD2DRL,RINPR,ADISRH, RONPRL ,AD2SRH, RONPRL , SOT+6 
80S6 054513 001 235 041 
80S7 OS4S16 235 106 
g0S8 OS4Se0 o00050 TODO@: .BLKW 40. 
BnPa 054640 000000 TODeC: .WORD O 
8061 ; THE FOLLOWING TABLE IS USED BY FLASH TO INDEX THE JOBS BASED 
8062 ;ON THE INFO THE LPR_RETURNS AS ASSIGNED JOB NUMBERS. 
8063 ;FLASH INDEXES THIS TABLE_WITH THE JOB NUMBER TO STORE THE RDA 
8064 ;ADDR. WHEN CODE=0,ANY OTHER TIME TABLE IS INDEXED TO GET 
8065 ; THE RDA ADDR. OF A PARTICULAR JOB. 


G16 
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ORLPA.P11 =- DEDICATED MODE DISPATCH TABLE SEQ 0201 
8067 OS4642 000000 TABLE: .WORD 0 
Sos Be Se 
80 30 $800 WORd 
8071 0546 0000 WORD 
8072 O54654 000000 WORD 0 
8073 054656 000000 ORD oO 
8074 054660 000000 WORD 0 
8075 O5466e 000000 “WORD 0 
8076 ;NOTE THIS AREA FROM  TODOG: TO DONEC: IS 
8077 !CLEARED EACH TIME FLASH IS ENTERED. 
8078 054664 000050 DONEG: .BLKW 40. 
8073 O5S004 000000 DONeC: -:WORD O 
8081 OSS006 000000 001000 o00004 LISTIO: 0,1000,4 jARIL CHO,EXP GR. ,TOL,4 
g082 O550i4 900003 001754 oD00e4 3/1754; 24 ; 3, xP 1754,T 
8083 055022 o00002 001315 o0000e4 2} 1315; 24 ; 2 EXP 1315, To 34 
B84 055030 00003 001754 oo00e4 3/1754) 24 SEXP 1754; TOL 24 
8086 055036 000000 OO4000 O00004 LIST12: 0,4000,4 ;ADLIK CHO,EXP GR,TOL 4 
8087 O55044 oo0002 Oco4632 o00050 2; 4632;50 ; 2 
g088 O550S2 000003 006000 9000144 3/6000; 144 
B083 055060 000004 od2000 oD0e40 4 2000, 240 
8091 ae REQUEST DESCRIPTOR ARRAY FOR JOB #0 
8093 1 ee THIS TABLE WILL BE ALERED BY THIS PROGRAM 
8094 er AND BY THE LPA-11 OPTION. 
BOSE “as 
8097 OSS066 oo0000 JOBO: .WORD 0 ;/MODE INFORMATION. 
8098 055070 oo0000 -WORd =O 
g099 055072 055164 “WORD  O+JOBOU ;/USW cube. STATUS. WORD) 
8iG0 055074 090 ‘BYTE 0 ;7USH (EXTENDED ADOR. BITS) 
810i 055075 000 ‘BYTE VALID BUFFER MASK 
8102 055076 oo0000 “WORD 0 {BUFFER ADD 
8103 055100 000 "BYTE 0 ZEXTENDED AD Ress BITS 
8104 055101 000 "BYTE t/U NUSED 
8105 055102 oo0000 ‘WORD =O {BUFFER ADDRESS #1 
8106 O55104 900 ‘BYTE O : EXTENDED ADDRESS BITS 
B107 055105 000 ‘BYTE } /UNUSE 
108 055106 oo0000 "WORD ; /BUFEE ADDRESS 8 
8109 055110 000 "BYTE O ZEXTENDED ADDRESS BITS 
8110 055111 000 "BYTE 7UNUSED 
8111 055112 ooo000 “WORD =O :/BUFPER ADDRESS # 
8112 055114 000 "BYTE EXTENDED ADDRESS BITS 
8113 055115 000 ‘BYTE 0 : 7UNUS 
8114 055116 oo0000 “WORD =O ; BUFFER ADDRESS # 
8115 055120 000 BYTE 0 ZEXTENDED. ADDRESS 81TS 
8116 055121 000 "BYTE 0 :/UNU 
8117 O551e2 oo0000 "WORD 0 BUFFER ADDRESS # 
8118 055124 00 "BYTE ; “EXTENDED RODRESS BITS 
8119 O551e5 00 "BYTE 0 /UNUSE 
8120 055126 oo0000 "WORD =O :7BUFFER ADDRESS #1 
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000000 
000000 


000 
000 


000000 
000000 
000003 
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SEQ O202 
BYTE O ; “EXTENDED ADDRESS BITS 
.BYTE O UNU ED 
WORD O ; OBUFFE ADDRESS # 
YT 9 | ZEXTENGED ADDRESS 1B1Ts : 
YT 
WORD JOBGR- ;/RCLR ey OF LIST OF RANDOM CHAN) 
.BYT 0 Cl EXTENDED ADR. BITS 
.BYT 0 ‘ 
JOBOS: .BYTE a) ; CHANNEL START ADDRESS 
.BYTE O ! “NUMBER OF CHANNELS 
.BYTE O ; “CHANNEL INCREMENT Ss 
-BYTE O :/FATAL ERROR MASK 
. WOR a) /DELAY 
WORD 0 : SAMPLE RATE 
.BYTE O ;/STWD 
.BYTE O + EMD EVENT MARK DIGITAL INT WOs 
.WOR ;/ST MSK 
WORD 5 :7EM MSK EVEnT MARK DIGITAL IPUT MASK. 
;END REG. TABLE 
WORD 03 ; “CONTAINS STOP CODE _FOR THIS JOB. 
“WORD O : CONTAINS LOOP COUNT FOR JOB.(NO OF TIMES THUR BUFFER. 
JOBOU: .WORD 0 ;7USW USER STATUS WORD 
JOBOR: .BLKW 7 


JOB1: .WORD 
«Wd 


REQUEST DESCRIPTOR ARRAY FOR JOB #1 


THIS TABLE WILL BE ALERED BY THIS PROGRAM 
AND BY THE LPA-11 OPTION. 


“MODE INFORMATION. 


ZWORD CO 
+JOB1U ;/USW usc STATUS W ORD) 
; 7USW (EXT NDED ADDR. BITS) 
:7VBM (VALID BUFFER MASK) 
{BUFFER ADDRESS # 
5 EX XTENDED ADDRESS BITS 


/UNU 
; (BUFFER ADORESS & 
:ZEXT ED ADDRESS ‘BITS 


/UNU 
: BUFFER ADDRESS #1 


OO0O000000000 
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@o 
~ 
>| 
wi 


ODDODODDDDODDODDODODDDODODODOODDODOWM 
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0SS260 
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0SS264 
O0SS266 


055270 
05Se71 


oSSe72 
058274 
0SS276 
055300 


055302 


055304 
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SEQ 0203 
.BYTE 0 ; “EXTENDED ADDRESS BITS 
‘BYTE 0 /UNUSED 
"WORD 0 :7BUFFER ADDRESS # 
‘BYTE 0 : /ZEXTENDED ADDRESS BITS 
BYTE O ; “UNUSE 
WORD OQ /BUFFER ADDRESS # 
‘BYTE 0 ; ZEXTE ED ADDRESS BITS 
‘BYTE 0 UNUSE 
WORD O | BUFFER ADDRESS 
‘BYTE 0 7 Rese BITS 
BYTE 0 7UNUS 
WORD O :/BUFFER ADDRESS # 
BYTE O ; “EXTENDED ADDRESS BITS 
BYTE OQ NUSED 
‘WORD OQ + BUF ER ADDRESS #1 
‘BYTE 0 : /EXTENDED ADDRESS BITS 
“BYTE 0 : “UNUSED 
-WORD JOBIR ;/RCLR (ADDR OF LIST OF RANDOM CHAN) 
‘BYTE 0 ;7RCL_EXTENDED ADR. BITS 
‘BYTE 0 : /UNUSED. 
JOBIS: .BYTE 0 ; CHANNEL START ADDRESS 
-BYTE 0 ! NUMBER OF CHANNELS 
.BYTE 0 /CHANNEL INCREMENT 
‘BYTE 0 : FATAL ERROR MASK 
.WORD O ;/DELA 
‘WORD 0 i SAMPLE RATE 
.BYTE 0 ; /STWD 
‘BYTE 0 :/EMWD EVENT MARK DIGITAL INT WDs 
.WORD O ;/ST MSK 
‘WORD 0 !7EM MSK EVENT MARK DIGITAL IPUT MASK. 
;END REG. TABLE 
WORD 03 ; “CONTAINS STOP CODE FOR THIS JOB. 
‘WORD O : “CONTAINS LOOP COUNT FOR JOB.(NO OF TIMES THUR BUFFER. 
JOB1U: .WORD 0 ;/USW USER STATUS WORD 
JOBIR: .BLKW 7 


REQUEST DESCRIPTOR ARRAY FOR JOB #2 


THIS TABLE WILL BE ALERED BY THIS PROGRAM 
AND BY THE LPA-11 OPTION. 


J16 


DMDT MACY 11 27 (B64) 13-DEC-77 12:58 PAGE 1 
DRLPA. P11 DMDT -- DEDICATED ModE DISPATCH TABLE SEQ 0204 

8229 055322 000000 JOB2: .WORD 0 ; “MODE INFORMATION. 
B8e30 O0553e4% o00000 “WORD 0 UNT 
8231 5326 055420 WORD O+JOB2U ;/USW (user STATUS WORD) 
232 5330 000 ‘BYT 0 ;/USW (EXTENDED ADOR. BITS) 
8233 055331 000 “BYTE O :/VBM (VALID BUFFER MASK) 
8234 5332 oo0000 "WORD O ?/BUFFER ADDRESS # 
8235 53 000 “BYTE O ;/EXTENDED ADDRESS BITS 
236 055335 000 ‘BYTE O : /UNUSE 
8237 055336 ooo000 ‘WORD O iY waa? ADDRESS # 
238 340 000 “BYTE O ZEX TENDED DBDRESS BITS 
8239 055341 000 "BYTE 0 USED 

40 055342 o00000 ‘WORD O : UNE ADDRESS # 
8241 055344 00 “BYTE O j “EXTENDED RDDRESS_ BITS 
Be4¥2 O55345 000 "BYTE O /UNUSED 
824 esu6 oo00000 ‘WORD O i /BUPFER ADDRESS # 
8244 SO 000 "BYTE O 7EXT TENDED ORBRESS BITS 
824S 055351 000 “BYTE 0 
8246 055352 o00000 WORD O BR ADDRESS # 
8247 055354 00 BYTE O 7 XTENDED AD! Ress BITS 
8248 055355 000 BYTE 0 

4 5356 000000 WORD O + BUFFER ADDRESS # 

055360 000 BYTE 0 57EXT ENDED ADDRESS 1BITs 

8251 055361 000 BYTE 0 : /UN USED 
82 5362 oo0000 WORD O : “BUFFER ADDRESS #1 
8253 055364 BYTE 0 ; “EXTENDED ADDRESS BITS 
8254 055365 BYTE 0 /UNUSED 

S 055366 on0000 WORD O : “BUFFER ADDRESS # 
8256 055370 BYTE 0 : EXTENDED ADDRESS 1aITs 
B25? 055371 000 BYTE 0 : UNUSED 
8259 055372 oSS422 .WORD JOBe2R  ;/RCLR (ADDR OF LIST OF RANDOM CHAN) 
8260 055374 006 ‘BYTE O ;7RCL EXTENDED ADR. BITS 
Beb1 055375 000 "BYTE OQ : /UNUS=D. 
8263 055376 000 JOB2S: .BYTE fs) ;/CHENNEL START ADDRESS 
Beb4 055377 060 -BYTE O + /NUIBER OF CHANNELS 
8266 
8267 OSS400 000 BYTE O ; “CHANNEL INCREMENT 
8268 055401 000 "BYTE O :/FATAL ERROR MASK 
8270 oSS4O2 oD0000 .WORD O ; DELAY 
Beri 055404 oo0000 "WORD O :/SAMPLE RATE 
8273 oOSS406 000 .BYTE O ;/STWD 
Berd 055407 000 ‘BYTE O :/EMWD EVENT MARK DIGITAL INT WO# 
8276 OSS410 oDD0000 .WORD O ;/ST MSiC 
8277 055412 oo0000 ‘WORD O !7EM MSk EVENT MARK DIGITAL IPUT MASK. 
8279 ;END REG. TABLE 
8280 oOSS414 000003 WORD 03 ;/CONTAINS STOP CODE FOR THIS JOB. 
8281 O55416 900000 "WORD O : “CONTAINS LOOP COUNT FOR JOB.(NO OF TIMES THUR BUFFER. 


- 
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DRLPA.P11 DMD 


8e83 oss4¥2e0 000000 
8284 

828s 

8e86 OSS4ee 000007 
8287 

8288 

8e89 

8290 

8291 

8e3e 

8293 

8294 

8e9S oOsS5440 000000 
8e396 O5544e 000000 
8297 O55444 055536 
8298 OSS44 00 
8e99 OS5447 000 
8300 055450 000000 
8301 OS54Se 00 
Be BRE ott 
8304 QOS54 00 
8305 055457 00 
8306 O554%60 000000 
8307 OSS46 00 
8308 OSS46 00 
8303 055464 000000 
8310 O5S5466 00 
8311 OSS467 000 
83ie 055470 o0g0000 
8313 OS547e 000 
8314 055473 000 
831S 055474 9000000 
8316 OSS476 00 
8317 055477 0 
8318 SS00 000000 
8319 O5550e 00 
8320 055503 00 
8321 SS04 900000 
8322 SS06 00 
8323 9055507 000 
8324 

83eS 055510 OSSS4O 
83e6 O555le 000 
83e7 055513 000 
8328 

83e39 055514 000 
8330 055515 000 
8331 

8332 

8333 055516 000 
8334 055517 000 
8335 

8336 .o55Se0 o00000 


DEC-77 le: 
a beDicATeD MODE 


1 S8__PAGE 175 
DI 


SPATCH TABLE 


JOBeU: .WORD 0 ;7USW USER STATUS WORD 
JOBeR: .BLKW 7 
; ¥* 
Teed REQLEST DESCRIPTOR ARRAY FOR JOB #3 
; ¥* 
; ee THIS TABLE WILL BE ALERED BY THIS PROGRAM 
= AND BY THE LPA-11 OPTION. 
JOB3: .WORD ia) ;/MODE INFORMATION. 
. WORD 0 7WO' 
WORD O+JOB3U ;/USW cusER STATUS WORD) 
BYTE 0 ;7USW (EXTENDED ADDR. BITS) 
BYTE 0 ;7VBM (VALTD BUFF ER MASK ) 
WORD 0 ;/BUFFER ADDRESS # 
BYTE 0 37EX XTENDED OBBREsS- BITS 
BYTE 0 7UNUSED __ 
WORD O iY ides MUORESS # 
-BvIE B 7EXTENDED RRDRESS_ BITS 
WORD OQ ¥ FFER ADDRESS # 
BYTE 0 3 /EXT a ADDRESS 1aITs 
-BYTE OQ + /UNU 
WORD 0 }/BUFFER ADDRESS #1 
.BYTE 0 : /EXTE D ADDRESS BITS 
- BYTE 0 37 UNE 
WORD OQ /BUFFER ADDRESS 
.BYTE 0 EXTENDED RBORESS- BITS 
‘BYTE O : i “UNSER 
. WORD 0 ;/BUFFER ADDRESS # 
.BYTE 0 i ZEXTENED ADDRESS 1gITs 
BYTE 0 US 
WORD O BUFF ER ADDRESS # 
BYTE 0 : EATEROES ADDRESS BITS 
- BYTE 0 “UNUSED 
WORD 0 : BUFFER ADDRESS #1 
BYTE 0 : /EXTENDED ADDRESS BITS 
-BYTE 0 ; “UNUSED 
WORD JOB3R ;7RCLR (ADDR OF LIST OF RANDOM CHAN) 
.BYTE 0 /RCL_EXTENDED ADR. BITS 
.BYTE 0 : SED. 
JOB3S: .BYTE 0 ; “CHANNEL START ADDRESS 
. BYTE 0 : /NUMBER OF CHANNELS 
- BYTE 0 “CHANNEL INCREMENT 
. BYTE 0 FATAL ERROR MASK 
. WORD 0 ; “DELAY 


SEQ 0205S 


DMDT 


MACY 11 


DRLPA.P11 


ossSee 


bseess 
b88830 


05$$32 
OSSS34 
055536 


osss40 


088628 


“L16 
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DMDT -- DEDICATED MODE DISPATCH TABLE SEQ 0206 
ooo000 .WORD O ;/SAMPLE RATE 

900 -BYTE O ;7STWD 
wm 9d :/EMWO EVENT MARK DIGITAL INT WO# 
oooo0c .WOR 0 i 7ST Msk 
000000 : WOR 0 :7EM MSK EVENT MARK DIGITAL IPUT MASK. 
;END REG. TABLE 
000003 WORD 03 ;/CONTAINS STOP CODE FOR THIS JOB. 
o00000 ‘WORD O : CONTAINS LOOP COUNT FOR JOB.(NO OF TIMES THUR BUFFER. 
oooo00 JOB3U: .WORD 0 ;7USW USER STATUS WORD 
000007 JOB3R: .BLKW 7 
; ** 
jee REQUEST DESCRIPTOR ARRAY FOR JOB #4 
eH THIS TABLE WILL BE ALERED BY THIS PROGRAM 
Ht AND BY THE LPA-11 OPTION. 
oooo00 JOBY: .WORD 0 ;7MODE INFORMATION. 
000000 .WORD OQ /W 
055654 WORD O+JOB4U ;/USW (USER STATUS WORD) 
000 BYTE 0 7USW (EXTENDED ADDR. BITS) 
poo000 ORDO i BereER nOpRESS. a6. 
900 YT 2 ENT Riepee> nese BITS 
YT 
oo0000 WORD O ’BUFF ER ADDRESS # 
000 -BYTE 0 extent ADDRESS 1gITs 
000 ‘BYTE O /UNUSE 
ooooo0 WORD O Y seiai. ADDRESS # 
000 ‘BYTE O EXTENDED ADDRESS 1a1Ts 
000 ‘BYTE O : 7UN SED 
ooco00 ‘WORD O y UFFER ADDRESS #1 
000 “BYTE O ;7EXTENDED ADDRESS BITS 5 
000 ‘BYTE O ? UNUSED 
ooo000 WORD O iY sad? ADDRESS #1 
000 -BYTE O ZEXTENDED ADDRESS SITS 
000 BYTE O ; “UNUSED 
oo0000 WORD O BUFF ADDRESS # 
000 BYTE 0 : EXTENDED ADDRESS 1BITS 
ooobb0 BORD ; /UNUS P 
850 ‘BYT 0 i EXTENDED ADRESS. BITS 
000 BYTE 0 /UNUSED 
ooooo0 WORD O BUFF ER ADDRESS #1 
000 BYTE OQ : EXTENDED ADDRESS BITS 
000 BYTE 0 : UNUSED 


DMDT 


MACY11 


DRLPA.P11 


8420 


OSS626 
0SS630 
055631 


OSS63e 
055633 
0SS634 
O0SS635S 


0SS636 
055640 


oss64e 
0SS5643 


OSS644 
OSS646 
055650 
OSS6S2 
OSS6S4 


OSS6S6 


0SS7e4 


M16 
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DMDT -- DEDICATED MODE DISPATCH TABLE SEQ 0207 
os5s656 .WORD JOBYR  ;/RCLR (ADDR OF LIST OF RANDOM CHAN) 

000 BYTE 0O ;7RCL EXTENDED ADR. BITS 
000 .BYTE O 5 UNUSED. 
000 JOBYS: .BYTE 0 ;/CHANNEL START ADDRESS 
000 _BYTE 0O : NUMBER OF CHANNELS 
000 .BYTE 0O ; “CHANNEL INCREMENT 
000 ‘BYTE O :/FATAL ERROR MASK 
oooo00 .WORD O ; DELAY 
000000 “WORD O :/SAMPLE RATE 
000 .BYTE Oo ;/STWD 
000 -BYTE 0 :/EMWD EVENT MARK DIGITAL INT WO# 
oo0000 .WORD O ;/ST MSK 
000000 .WORD O :/EM MSK EVENT MARK DIGITAL IPUT MASK. 
;END REG. TABLE 
000003 WORD 03 ;/CONTAINS STOP CODE FOR THIS JOB. 
ooo000 :WORD 0 : CONTAINS LOOP COUNT FOR JOB. (NO OF TIMES THUR BUFFER. 
ooooco JOBYU: .WORD 0 ;/USW USER STATUS WORD 
000007 JOBYR: .BLKW 7 
; ¥% 
jae REQUEST DESCRIPTOR ARRAY FOR JOB #5 
er THIS TABLE WILL BE ALERED BY THIS PROGRAM 
je AND BY THE LPA-11 OPTION. 
: 
ooo0000 JOBS: .WORD 0 ; “MODE INFORMATION. 
000000 .WORD O 
055772 "WORD O+JOBSU ;/USW cube BO at TUS Wo 
00 “BYTE : ;7USH CE (EX XTEN OED “200R. ITS) 
a ByT o 8 UFFER MASK) 
B85 ‘BYT 0 gi rehbetRObaest BITS 
poog00 “BORD 5 NEFER R 
BBB *BYT EXTENDE oe BRest: SITS 
000 BYTE 0 . 
oo0000 WORD O aires ADDRESS # 
YTE O 3 ZEX TENDED OBDRESS_ BITS 
YTE O : /UNUSE 
- 900000 WORD O :/BUFFER ADDRESS # 
000 ‘BYTE O ; “EXTENDED ADDRESS BITS 
000 ‘BYTE O t/ 
000000 : ‘WORD O :/BUFFER ADDRESS #1 


eee 


BOl 
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DRLPA.P11 DMOT -- DEDICATED MODE DISPATCH TABLE SEG O208 
guys 0557 909 YTE O ;7EXTENDED ADDRESS BITS 
7 YTE O + /UNU 
8447 5730 000000 WORD O ;/BUFFER ADDRESS # 
ug * d DOC .BYT 8 j EXT NOED ADDRESS 1aITs 
- 3 oo0000 HORDB OO 1 eee ADDRESS # 
Suet Os573¢ O50 BYTE 0 i ZEXTENDED ADDRESS BITS 
oY 573 000 BYTE 0 + /UNU: 
Bes 5740 000000 WORD O ;/BUFFER ADDRESS #1 
8454 74 0 BYT 0 5 preted ADDRESS BITS 
Bee 74 00 BYT 0 : 
8457 OS5744 055774 WORD JOBSR  ;/RCLR me OF LIST OF RANDOM CHAN) 
Bu28 0e8 00 YTE O CL EXTENDED ADR. BITS 
B59 548 0 YTE O 
8461 055750 000 JOBSS: .BYTE 0 /CHANNEL START ADDRESS 
Bub 055751 000 .BYTE O : “NUMBER OF CHANNELS 
8464 
8465S 055752 000 .BYTE O /CHANNEL INCREMENT 
BYbe 055753 000 ‘BYTE O FATAL ERROR MASK 
5754 oo0000 .WORD O /DELA 
Bes 35756 000000 -WORD O i SAMPLE RATE 
8471 055760 000 -BYTE 0O ;/STWO 
B42, 055761 000 -BYTE 0 ;7EMWD EVENT MARK DIGITAL INT wOs 
8474 OS55762 0000 .WOR :/ST MSK 
Bi7e 055764 B00000 “HORD FE :7EM MSK EVENT MARK DIGITAL IPUT MASK. 
77 ;END REG. TABLE 
8458 0SS766 o00003 FORO 03 ;/CONTAINS STOP CODE FOR THIS JOB. 
ie 055770 oo0000 WORD O :/CONTAINS LOOP COUNT FOR JOB. (NO OF TIMES THUR BUFFER. 
B81 055772 000000 JOBSU: .WORD 0 ;7USW USER STATUS WORD 
8483 
8484 055774 9000007 JOBSR: .BLKW 7 
848s 
8486 5 ee 
m +4 ae REQUEST DESCRIPTOR ARRAY FOR JOB #6 
S485 + THIS TABLE WILL BE ALERED BY THIS PROGRAM 
8436 1 a4 AND BY THE LPA-11 OPTION. 
ae a 
84983 056012 o00000 JOB6: .WOR' 0 ;/MODE INFORMATION. 
8494 0560145 9o00000 RORO C /WORD 
6849S OS60i6 056110 ‘WORD O+JOB6U ;/USW cuseR STATUS WORD) 
96 056020 coc ‘BYTE QO ;7USW (EXTENDED ADOR. BITS) 
8497 OS60e1 000 “BYTE OG :/7VBM (VALID BUFFER MASK) 
8498 056022 o00000 WORD O :/BUFFER ADDRESS #0 


‘ 


COl 
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DRLPA.P DMDT -- DEDICATED MODE DISPATCH TABLE SEQ 0209 
e499 000 .BYTE ; “EXTENDED ADDRESS BITS ' 
BYT 7UNU 
oo08e WOR 37 ADORESS #1 


i ZEXTEN D ADDRESS BITS 


BRR SPRERESL ors 
BE Re OPRBRE rr 
Pei ERocBRBERESS BITS 
ABR SORENESS BITS 


¥ BUFFER 
XTi 


eRe 


fy 
z 


at 


WONT WU£CWM-O Wo 


ee 


WOR 
Vie 7 s¢'p1ts 
| 000000 WORD | BUFFER 
5 7EXT D RODRESS BITS 


OB6R = ;/RCLR O08 OF be See abe RAND M a 


+ AUN L_ START ADDRESS 


ate 00 JOBES: .BYT 
Beece 00 . BYTE /NUMBER OF CHANNELS 


VU eAc 


056070 000 BYTE QO ; “CHANNEL INCREMENT 
056071 BYTE 0O :/FATAL ERROR MASK 
056072 000000 WORD OQ /DELAY 
056074 0000 WORD O : SAMPLE RATE 
056076 000 -BYTE OQ ;7STWD 
056077 000 -BYTE O ;7EMWD EVENT MARK DIGITAL INT WD# 
0 37ST MSK 
Bee 05610e 000000 -WORD O ;7EM MSK EVENT MARK DIGITAL IPUT MASK. 
4 ;EN nes, _ at 
Beqa 056104 000003 GORD ;7CONTAINS STOP CODE FOR THIS JOB. 
4S 056106 000000 “WORD O° : “CONTAINS LOOP COUNT FOR JOB.(NO OF TIMES THUR BUFFER. 
Ne 056110 oo0000 JOB6U: .WORD 0 ;7USW USER STATUS WORD 
8549 
BeB0 056112 000007 JOB6R: .BLKW 7 
gsSe 5 ee 


| 
8540 056100 o00000 . WORD 
| 
| 
| 


DMOT 
DRLPA.P11 


rititninttatath 
PRLO 


wo 
N 


tad 
n 


Baas 


2 


RRR Ree nro rere 
IZINIGET BOS GOS EGREN RENE 


a 0 oh be 


: 


R 
s 


MACY11 27(65S4) 
OMO 


800000 


000 
000 


000000 


13-DEC-77 8 
T -- DEDICATED MODE DISPATCH TABLE 
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JOB7: as 


7S: .BYT 
ae 


BYTE 
BYTE 


- WOR 
. WOR 


BYTE 
BYTE 


- WORD 





001 c 


REQUEST DESCRIPTOR ARRAY FOR JOB #7 
i) Se 3 WELL | BE Bb FRED BY THIS PROGRAM 


5 MOOS CONT 
./ ( Ae aus. 
— uséR s (EX ENCED. ADDR. BITS) 
; Men ren MASK ) 
; “EXTENDED ADDRESS BITS 


bY ADDRESS #1 
a ADORESS BITS 


os a 
een. Ws 
Beebe! BITS 


7 ;7RCLR cane OF LIST OF poe CHAN) 
weet Ayoy CEXTERED ADR. BITS 


000000 0000000000 


; “CHANNEL START ADDRESS 
pee OF CHANNELS 


00 00S OODO0CKOO0O000000 


/CHANNEL INCREMENT 
FATAL ERROR MASK 
i SAMPLE RATE 


+ EMD EVENT MARK DIGITAL INT WD# 


37ST MSK 


oO 00 00 OO 


SEQ 0210 


DMOT 
DRLPA.P11 


ast 


deatatudsatatiat atad ad 
ed eee ee 
WONOW CWO 


SReOes 


MACY11 Al 
oS6220 
OSbeee 000003 
OSb2e4 0000 
OS6226 
0S6230 
Deceue 
1254 
eS& 000200 
S6 000200 


R 


000001 


13-DEC-77 


-- DEDICATED MODE DISPATCH TABLE 


EOl 


;7EM MSK EVENT MARK DIGITAL IPUT MASK. 


;7CONTAINS STOP CODE FOR THIS 


SEQ 0211 


JOB. 
;/CONTAINS LOOP COUNT FOR JOB.(NO OF TIMES THUR BUFFER. 


;/USW USER STATUS WORD 


THE FREE CORE AREA BETWEEN HERE AND PRO 


GRAM 
“DRLPXO” a! BE USED BY CERTAIN PARTS OF THIS 
Y NOT E ANY CODE HERE. 


ROGRAM. MAY NOT_PLAC 
LAST AVAIL IBLE SPACE TO PUT CODE IS 


LOCATION “FRECOR™ 


IF YOU HAVE TO NS pai THIS,DON’T ALLOW ROUTINE 


“MAKEI" TO BE RUN 


12:58 PAGE 181 

-WORD OO 
END REG. TABLE 
‘ORD 03 
“WORD O 

JOB7U: .WORD OO 

JOB7R: .BLKW 7 
FRECOR: 

BUFFER: 

BUFFO: .BLKW 257. 

BUSF1: <BLKW 357. 

BUFF2: BLKW 387. 

BUFFS: BLKW 357. 

BUFF4: BLKW 128. 

BUFFS: BLKW 128. 
, WARNING 
; 
; 
‘END 


BEFORE 
OR AFTER ADDRESS “65500”. 


FOL 


DMO t MACY11 27(654) 3-DEC-77 12:58 PAGE 182 
DRLPA.P11 CROSS REFERENCE TABLE 
AACSR 001624 yy 822% 2987 2938 3007 30093 3020 
AALIK S74 S758 B21 Gays 
= ese 2693 310 464 467 469 471 
of b- 
= 
ac = 269 284 
ADAC S948 768% 769% 
S978 B34 83S* 
4 S338 1820 1867 
S96 1982 29 
ep se3 
le 269 
ppet Os 269 
ll= 269 
pet D e639 
1 269 
ADOW14= 269 
S= Of 263 
= 69 
= | 
= 269 
ADDWS = 269 
= 269 
ees 
= 
ADDWS = 269 
avers 26 275 
VM = 26 311 
65718 
AD1 = 79558 7967 7972 7979 7984 7991 7939 
AD 1SRH= 79608 8031 80393 8047 goss 
ADISRL= 739508 7967 7972 7979 7984 7991 73939 
ADIIK S7e8 7 4yyos 


768 832 4439 
786 8 7994 8002 8011 8019 8031 8039 


Fete) 
3 


ADESRH= 79618 8031 80393 8047 g0SS 

ADeSRL= 79588 7994 8002 8011 8019 8028 8036 
RENVM = sea Ba 

AFATAL= 269 e7e 


6808 687S* 6876 6882 886 7789 


PPPP 
a 





AMADR 1= 693 297 
ans 269 301 
poe: eS 
serel: eB 
pt Se oO 
AMSGAD= e693 e277 


3022 


473 


8008 
8008 


8047 
8044 


3032 


475 


8016 
8016 


8055 
80S2 


80e8 
80e8 


8036 
8036 


4221 


8044 
8044 


SEQ O2le 
4229 


g0Se 
s0S2 


OMOT 
ORLPA. 





Teofesfeafeeteefeslealerlertes les] 
1 ae haem hen Io Rae ae ee Lee oe ioe oe) 
Sieh tatattotnd- t-te 

BITRLOV—O 


-O 
wo 
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MACY11 27(654) 13-DEC-77 
Pll CROSS REFERENCE TABLE 
2693 278 
269 271 
269 2392 
sg 300 
2 306 
Seq 
269 
6271 64148 
S966 6264 
743 64118 
6518 Bes 
pene a 
goss Bde 
see" gist 
358. 
6568 843% 
6578 B44" 
aPae 837 
SP r=4 
3 27 
263 276 
2693 283 
& she 
1 S44 
65098 6540 
65378 6S49 
Sie 
0000: ahi g 4243 
ait ties 
= 000001 1608 170 
= 000002 1598 169 
= O04 1588 168 
s 40 i2z8 167 
= 1S68 166 
= 0 1SS8 165 
= 100 1548 164 
= 1S38 163 
= 000400 1Se8 162 
= 001000 1518 161 
= 000 mt ae 
ecug | See 
= 002000 1508 1792 
4427 4447 
= 004000 1498 1443 
= 010000 1488 1792 
$390 S494 


64128 


482 


GOl 


3218 


3340 
3438 


3496 
3506 


491 


3229 


3342 
3440 


3498 . 


3508 


493 


3231 
33S$2 
3451 


3517 
3528 


3241 
3354 
3453 


3519 
3530 


3243 
3367 
3463 


3858 
3566 


3256 
3369 
3465S 


3574 
3581 


3260 


3380 
3560 


SEQ 0213 


3382 
3568 


4310 
S232 
4405 


$311 


5715# 
65648 
65688 
758348 
7984 


3045S 


gooe 
B7e0e 


6503 
6758 


7994 


3089 


8019 


6759* 


8002 


3134 


8036 


8008 


4211 


80S2 


8011 


4227 


SEQ 0214 


8019 
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DRLPA.P11 CROSS REFERENCE TABLE SEQ 0215 
DAC1 001630 Be4s 828% 3054 3056 3098 3100 3143 314S 4219 4234 
DAC 6038 82S 829% 3065 67 1093 3111 3154 3156 
Bat Je30 Ye Sent 30% 76 78 3120 3l2e 3165 3167 
ISP = 1 0 8 0 31 
DEVLST 054130 4354 4390 4400 4493 3 4S70# 4S71% 4597 4631 4632 4633% 4648 
"SSS 4683% 4684 6739 6800* 6801 739148 
DFO 042606 33 344 Sl 358 365 372 379 386 393 400 414 42el 428 
43S 4ye 44g 77628 
DHL 042240 335 77098 
DH17 321 433 77218 
DHe eebl 34e 370 377 384 391 3398 412 419 426 77138 
RiSaes 440 77288 
1 e4e 446 77358 
DH3 2312 349 #26 77198 
BiZeLe 1142 esos 31% 739% S9S3* 6095* 
I 0174 be8 739 
OMAsT Rapes 4259 7435 79148 
DMDSIZ= 2 739478 7967 7972 7979 7984 7991 7339 8008 8016 8028 8036 8044 80S2 
DMD Bad iae 73168 73658 
DONEC S004 6810 80798 
DONe@ 0S4664 80788 
peers Ral bse 6088 787% 2257 2270 2284 6 2e9S 2297 2313 2334 2371 
ORC 1644 6138 794% 2403 e416 2430 2432 2441 2443 2459 2480 2517 
DRCR3 pte 6188 801% 2es43g e562 2576 2578 2587 e589 2605 2626 2663 
RY 1660 6238 x 2695 2708 2722 2724 2733 27 2751 2772 2809 
CRS D0 1666 8 815% 41 SY 2868 2870 2879 2881 2897 2918 955 
tad 001642 6108 789% 91% ses Si 3 348 S28 362 
OR 001650 6158 796% 798% ay=4 471 489 2494 SO. S08 
DRIAS apheed 6208 803% g0S# 2573 2617 2635 2640 2648 2654 
ORIAY 1664 6258 810% 81ex 2719 2763 2781 2786 2794 2800 
ORIAS 001672 6308 817% 819% 2865 23093 2927 2932 23940 2346 
are HHEHEE GC 14348 1435S 6729 
PX1= HHxREX GC 9708 97 
ORLPX2= ###eee GC 148 6970 
DROA1 001640 6098 788% 790% 2279 2311 2360 
prone tts 6148 79S* 797% 24eS 2457 492 2506 
DROA. 1654 6198 802% 804 2571 2603 638 2652 
proee D016 6248 09% 811% 2717 2749 2784 2798 
OAS D0i6 6298 16% 818 2863 283s 2930 2344 
DR11K 001572 S748 786 4461 
DR11K 001600 S778 733 4472 
DR11K 001602 S788 800 4477 
DR11K4% 001604 S798 807 4482 
DR11KS 001606 S808 814 4487 
DSWR = 177570 Sis 4g 730 
OT1 042516 336 77478 
DT17 042540 434 77538 
OTe uSees 343 364 371 378 385 392 339 413 420 427 77498 
DTe0 Se 441 7756 
DTel 042566 447 77598 
OT3 042534 350 357 77528 
ce 
D.0e0 OS4e01 G 79718% 7377 
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LPA.P11 Cross REFERENCE TABLE SEQ 0216 
“OES 4 739668 7970 
- TCO 4 801S8 8023 
. TCQP 44 80518 
-TCS OQOS4340 G 80078 8014 
D. TCSP 44S4 G 0438 8050 
B- Tee 4315 G 998% 8006 
‘Teer OS44 G 80358 2 
D.TES 42 G 73908 867997 
mt 4 nas G 80278 34 
MTVEC= 1808 715% 716% 
EM1 041504 334 76308 
Bie 1747 333 76668 
att 1776 393 76718 
ent 397 76768 
M14 2 41 76818 
EMIS 2074 41 76868 
EM16 042116 42S 76908 
EM17 O4e14e 432 445 76958 
ens a 1 76358 
MeO 2173 439 77018 
EM3 tte 348 76418 
EMY 41620 355 76468 
EM6 Ri eae 369 76538 
EM? 1705 376 76598 
ERAV areata 6530 He 654548 
ERCNT a1776 “Pee Peis 5775 S984 
RRVEC= Bo0005 1738 728 729% 740% 877% 881* 887# 927 928% 3e9 930% 9S0* 9S1# - 
6 6057% 6059%  606e% 
| Etpe. = O30ee2 Sees S670. SG71.S6778 
TEST 030576 4420 $7258 
FRECOR OSEe4e G oN ae © ee ee ie ee 
aye Baquec malt 874* 4819% 4932% SO4S* S51S8* S271* 6827 6828* 
§ 
GNS = ###eee U 61 aoe $755 5761 576 5773 66Se 6711 6745S 6777 6781 6963 7017 
7021 702 7253 7463 387 7578 7576 7S77 7578 7579 7581 7583 7584 
7353 7586 7893 7602 7611 7616 7622 
GTSWR = 104406 90. sis 
HT 000011 838 6279 6320 
IEX 036406 685. 68658 
S 036334 683 68518 
IOTVEC= 000 1788 713% 714% 
J OSSO66 4S33% 4535 4536 4751 4813% 4814* 4864 4926 4927% 4977 S039 SO4O0* 5090 
51Se# 5153% S203 SebS* Seb6* 5317 532e $351 5396 S401 5439 S487 S496 
S685 6625 6704 6735 6753 6767 6814 6816 8097 % 
JOBOR 055166 S4ee S424 8127 8154s 
JOBOU peeled 9236" 53e9 5408 5500 5688 80393 81518 
JOB1 oSS204 4779 4892 5005S 5118 S231 548 6704 6734 6767 6815 81638 
JOB1R OSS304 8193 82208 
JOB1S Beesed 81978 
JOB1U $5302 4783 4896 $009 Slee 5235 $519 8165 8217% 
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JOB 4 4765S 
_ JOB. Beeuse 4815% 
S268 
| JOBSR pepe'id 83eS 
JOB3S 14 83298 
JOB3U O0S5536 S328 
J SSS6 4 

J S6S6 83931 
J Ss S632 83958 
JOBYU S6S4 $$75 
JOBS S674 84278 
JOBSR S774 8457 
JOBSS 5750 84618 
jose BEeois ae 
JOBER 61le 8523 
JOBES 6066 85278 
JOB? B2e130 peace 
JOB7R pees3y 5319 
JOB7S 0S6204 85938 
oer OS6226 5635 
KMAD: 001466 GRY 
1251 
YPOS¥ 

: 7214 
KMAD1 001470 4678 
KM2De 001472 4698 
6462 

7235 
MAD3 001474 4718 
KM3D4 001476 4738 
703S# 
7446% 
KMADS 001500 475% 
KMADE 001502 477% 
KM2D7 001504 47948 
KUACRO BoLers ees 
K 1 Baiese e385 
KWADR2 581208 6408 
KWADRY 1702 b4es8 
KWADRS 001704 644" 
KWADR&E 001706 646% 
KWT O4411le 4310 
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KWVECL 002010 6998 
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KW1IL 3378 6944 
KWLIP 002002 695% 
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— TABLE 
4874 4987 5100 
82868 
4878 4991 5104 
4816% #4817 4928 
S269 oss 
83528 
8297 83498 
4366 4979 5092 
84188 
8363 84158 
84s4e 
8429 84818 
essos 
64395 8S474% 
S338 S4g1 8ssg 
61 86138 
4g 932% 934% 
utes dare. Lees 
754, Fuaee | Fane 

977% 

935% 1008 O62 
6989% 7002 7042 
744S% 

7537% 7S540# 

936 1014 1067 
7037% 7958 7101% 
937% 1020 1072 
7S2 7531% 7539% 
77e% 3 2103 
773% oO 3g. 5193 

774% 779% 

775% 780% 2136 

776% 781% 2199 

777% 782% 

4313 4698 4701% 
6611% 6614% £6805 
8egx 

890* 

771 440 

878 879 

882 883 


5213 


5217 
4929% 


5205 


86168 


KO1l 


82298 
ss4e 8231 82838 
4930% SO41* SO4¥ee SO43* S1S4*  S15S# 
83618 
001 1026% 1056 1077*% 1131 1177% 
1437% 14432 1448 14Se2 1565S 1580 
040 7100% 7102e% 7104% #7105* 71i1e% 
1187 1468* 1470 1sSe* 1574*% 1590# 
7070# 83 7151% 7156% 7160% 7182 
1S5S1x 1572% 1594 1647% 1670 7004 
7109* 7118% 7150% 71S4* 71S59% 7181# 
7113 7530% 7538% 
2115 21e5 2127 2174 2176 2187 
2149 2151 2160 2162 2201 2207 
4704* 4705S S314* 5315 5393% 5394 
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BRLPA.P1I1 CaBee REPERENCE TABLE SEQ 0218 

tistio” gssooe sore’ Sado Basie 
“LrBtie 36 5 Bul 570 $714 8086s 

tee 16 7408 

LOPC = s 1s 

LPADBR 001732 Beis S5beBES# 36653711 

ae 4728 Naige 55x WNSbe 56% WSb9% 4S97% 4631* 4648* 4682* 470S* 5S31S* s394* 

* *  d £ 

LPADSR 001730 ooeSe ‘ Ss 360i 73% eee = 630 3841038433653) 36SS 386823872 «(3687 
| 4317" 43S8* 4497* 4S00 4537% 4S73® 4576 4579 4S98* 4635* 

ve a ueara W243 eae Weage de 4 egee* 4706 4389 13 5316 5395 BY4R4e 6803* 

LPCKBR 001736 pees 6 aces «Bete S814 = 
LPCKSR 001734 6658 857% ##666% 3770 3780 3790 3792 «#43802 3804 ##i3816 #3818 # #3829 #3831 
'LPCO o01472 4eg8 4284 | ieee 4319, 4321, 43age aa, a a a 

LPDASR 001746 ego ube fs uBio os 4 3 Bus BBue «= s«Sade* = uosz = sa 67 

XR 718 72% 4066 4068 #4089 113 4115 4157-4172 

tPpAYR potzeS peie =a SCOBOSE «OBS? «=u Ssitosi«i‘wd? See 

Bele: i ge be Be be ee ie 

LPIOSR 001740 £678 859% 868% 3865 3878 3892 3894 +3903 3905 3921 3942 3979 

LPMR 001470 466s 

EB i 

CPSO. 001474 u708 #4291 4294 4328 4338 4342 4372 4512 4SS2 4593 4610 4720 6486 

LPS11 001612 B28 sy 4i2 4433 4454 4465 

C1 34744 G8 6737 

NMAsT oui cB wose «= RS” G85 GFR 

YT 754 ? 982 2029 3253 3554* 3560 3568 3576 ###3583 3665 43711 

adecaed eemnatles Wigs 4158 debe ARSE §=—s«sGSYG2 0s «S03 «44313. «44321 «= 4a290Sss«ae Sie) OBS 
| MO 04370 6 76768 

Mi BEI 6601 77678 

M10 043347 639 78358 

M11 043374 78398 

M12 3426 6666 42 78448 

M13 043460 78498 

M14 043551 6678 78598 

MIS 75 6684 78638 

M16 043621 78678 

MI? 3647 78718 

M18 3660 6726 78738 

M19 043724 6727 = 78798 

Me zie 6603 77838 
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PWRVEC= 000024 
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= 
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ee: a 
RAT CH 5 
RINPR = OOO01S 
RLOW 034520 
RONPR = 000035 
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7999 


BYYHR« 


6685S 


8002 


80de 
800e 


6688 


8008 


8008 
8008 
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RTEMP1 34 a | o3ce o3er* 6528*% 
% ® UOe 
RO =BB00 sons 530 
7% 
x 
Ye Ss 
* 1133% 1acee 1 
1440# dagen i3 ~ 43 - 
uaee ueose | ages 
4920% 4938 4941% 44977% 
S091 
ee: 
S632 8S# 777% 
cue’ cers BCE 
638. 640S# 6421 BY4GR 
681lex 7 % 


IR =% 8 749% 4 
: 1 000001 m4 3 


037 064% 7 
7318% 3e4e 7 
Re =~%000002 978 4801% 4“46e7% 4Y 
S140 166% eis? 2 
age 901 3 
6352 * bue 4 
6814% x 69 
| R2 =~%000003 9se 439e% * 
S6le S6 # 
S884 Segex 893% 
621 6 * 
6735 6 % 
ma =~%000004 ase (=F 7% 58 
6647%# 46s 4 
RC =~000005 1008 * 14393% 1757 
1857% 
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Suess | Bu27e 
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RLPA.Pi1 CROSS REFERENCE TABL 


3321 *  g340% 
3438 “Oe Six 
3508 17% 19% 
3601% 3617% 28% 
701% 3703% Zils 77 
31 Se % 
3951 4 3 % 
4OSS* 7% 4OBE# 4 % 
4126% 4157% 4159% 4165 
42278 42°e9% 234 cea8 
7% 7%  S88ox 
7065 7072% cie3t 7163% 
7352 7354 7359% 7360% 
RG =~000006 1018 07% 708% 709 
R7 =%000007 10e8 
SAMCNT O34S06 6509% 6525# 65778 
SAMOFF 034510 650S* 6 # 6524 65788 
scs = 000040 79578 7979 7984 8008 
SDELAY O40S4e a2 3668 3348 4499 
6842 74038 74 7442 
SDT = 000100 ace” 7967 7972 7979 
_ SEN = 000020 7 r 
SEX = 000120 79518 9ge$ 9938 7991 
SP =%000006 1038 uae 728% 
656% Be oe 768% 144 
s8ss 8s9 860% 
5905* 5907 5917 $919 
S982 S996% 6001 £60 
6114 6115 6bleex 61 
6154 pia igre 61 
fees fies’ Gan 
630) 630 e518 631 
6350 6351% 6353 635 
6399% 6404 640S bYHe 
bYH I] 6442 6443 bY 
638 664 6654 66 
6723 674 6853 
6923 44% 5308 538 
7219 233% 247 2 
7490 7552 7553 
SPEP 034160 S71le S7e 65058 
SRESET O40626 4495 43 7 4681 
0015S 1749 1911 
3547 35 760 3858 
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ORLPA.P11 CROSS REFERENCE TABLE SEQ Oee2e2 
SRe 001564 S608 2303 e449 es9s 2741 2887 3549 3911 4146 4202 4823 4936 5049 
Sige, Sg75 S37 BBS BOGS 
STACK = i100 8 11 86 4666 
START 016 68 7048 
stecop: ben's e558 | 
= 
STREG1 001614 a eee te 24 1772 1783 1785 1796 1798 1808 1810 1823 1827 1842 | 
STREG2 001620 5a Baa" 1313 1934 194S 1947 1958 1960 1970 1972 1985S 1989 2004 
SWR 4 498 7 730% Zz 738% 745% 90 42 426 S954 S961 5973 $977 
— cBel" afb i et ee er | 
SWREG 000176 638 738 901 6109 blee 
SWwO = 14e8 
SWOO = 13e8 142 
SWOl = 1318 141 
= 1308 140 
= 1e98 133 
= 1288 138 
= on le7e 137 
SWOB = 1 lebs 136 
7 = 1258 135 
= iSe 134 
= 001000 1238 133 
Sul = 1418 
SW10 = 002000 lees 
SW11 = 004000 lels 
SWle = 010000 1208 
SW13 = 020000 1198 
SW14 = 1188 
oa! = 1178 
= 1408 
SW3 = 000010 1398 
SW4Y = 000020 1388 
SWS = 000040 1378 
SWE = 000100 136% 
SW? = 000200 1358 
sw8 == 000400 1348 
SWS) ss = - 001000 133% 
fo B45 es Os 6903 7 
TAX Me 1974 * eaaee pears 6838* 6843% 6872* 
Tir : 14 74 es 7409 7414* 74188 7420% 
TKVEC = Sop8ed 18e8 
T 4640 6817% 6851 68S9* 80598 
¥ 4520 6807 6813 68S4 80S8s 
T le 59808 S44e* 5709% 5718% 6528 6531 6532 6535 65798 
TPVEC 4 1838 
T = 18is 717% 718% 
TRIVEC= 14 1768 
TST1 0035 eh 
TST1G §=©007254 214 21s 2166 2193 2220 ec4es 
TST11 007762 2305S 2320 23e9 2338 e3Se 2366 23948 
| 
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ORLPA.PLI CROSS REFERENCE TABLE SEO 0223 
Tst12 910470 eys1 NBG 2475 2424982512 2540s 
ag ite 86 BOOB BBB Bet 
TeTis O1e412 913 592 336 3950 59768 
TST1E 1344 Sos2 42 «sid3093S'si«<‘aO4Ssi31SSs32?)~Sss3138 = ss3149 = 3160 0s 3169 ~Ss 31788 
I ry 4018 3211 3223 43236 «= 324803262) 33098 
Teter oreiae 3252 3ci2" 35454 
Tetss tease 3225 3253s 
Tetsa 8 
TST 7044 391 3937 394% 40. 39680-3974 ~—S ss“ 
reise 7622 (an t¢C Pane tee TCE 
218 41 41968 
TST3. 004464 1137, A 1186 1328 1392 1406 14308 
ie a en 
' ' ~ 
TST ASNbE 4 4 4 3598 
1ST33 «020774 436843740 s«43780s«3 B78 
TST34 «OF 1616 4510 «4518 4245318 
Ts138 081738 ysug «4554s ES 
Tet 158 4 ueg5 4 uel2 46258 
Tet 4 eis ue ue7B8 
TeTy 1466 ©=6.1479s«a484 ~—s S408 
TST40 4022614 4691 «4718~—«s«4718—Ss«743 
TST4 4 4 uBsee 
TeT4 564 4ugs7s uSe98 
TeT4 10 Soss  s08e8 
TST44 5163 «5168 «= «51958 
TeT4s 6281 §309% 
ST¥e 416 S348 40-8 3888 
He By Suaes 
t 749% 
isin Beep : 
Tete i776 1790 «#41803 «1815 «©1833 ©1909 
TS17_ _ OOB4NE 19401952 «19851977 1995s 
Type? = 18qdee 2528 «86 2328" cmey 5771 Ss esis S926 6 S964 5995 6012 6014 6017 
6019 6023 36 «b120 e121 6124 6137 6148 6167 216 6219 6223 a4 
eq1g 6584 601609 ble) BbIS bbe?) bbe © E33 bb EIS BESO (BGG 
po7e = RPL = RPS bBPL BIS = BBP SRPPCSKR8 | SGBk 2S BESEy «E87 «= BEG 
7603 «7614S 7620 
TYPOC = 104402 7 6123 6631 6655 6665 7480 75768 7619 7625 
tYPON = 104404 75788 
USING © ABI7EE "e558 «6B78% 7759 
USRDA 1760 788 


63928 #6908 
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nu 


2 
SEN Fa Se ski ey eee 
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BREE 
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1556 4918 757% 758% 789 1384 1396 1397 4628 6829 
4938 759% 760% 139S* 1409# 1410 
1Sle YOU g 147; 4264 4493 4571 4633 46BY4 6801 
1560 1S 1592 1633 1650 1668 64618 
Bacae 461% 464% 64718 
00) 149% 1648 
040004 71S53% 71658 
040006 7158 r 
037532 1768S . 1927 2094 2257 2403 254g 2693S 2841 2987 3198 3322 3418 3609 
<4 | 6S 4010 63968* 7061 70878 7377 
1000 20' 1S8 
HEEEEE U 6392 6407 
033462 6363 636S8 
ee ae 
ate Nee osbee 6117 6238 
ee 
001250 gibe 748 
001122 e418 
001126 2438 999% 1001% 1006 1008 1009 1014% 1015 1020 1021 10S6* 10S8* 1062 
1067% 1072s 1247% 12$8 1315 1330 1473% 1481 1564 156S* 1S67 1594 1897 
1636% 1637# 1640 1670 1673 1754 1757 1772 1774 178S* 1786 1798 1799 
1810% 13)3 1827 1828 184S 1847 18S9% 1860 1916% 1919 1934 1936 Sigg” 
sie 4 as 173} 3326" 197 989 1990 2007 so $0 1% 2103 104 
ell 116 ele 1 el 1S1 elbe 2169% 2172 176 1 2189 2196 
2199 2207 2208 2219 2270 286 2297 2313 2314 23e5 334 s236 2362 
Soke me 2443 sag 2471 ms oo 3735 soue eS62 5378 cs Sour 
a a a ne ee a See 
3011 3022% 302: 34% 3045 3056 7 973 3083 3100 lll iss 3134 
314 3156 16 186% 30 setae 3207 18% 3219 3231 32 3243 3244 
3 1 30 31 4 3 354 362% 365 3369 3372 3382 
338 UoQx 40 41* 36 3 3% SY x 476 87 336 s sp 4? 
* Bb 58% * % A 17% 1 * 31 
3643 3644 % S6 2 36 38 36 703% 704 3290 3 8 37392 
37933 38 seiie 14 23} 3821 31 7 el 33 3933 
942 39 39 40212 40 4033% 4034 S# 4O46 40S7# 4068 407 4091 
4102 411 nt 41528 416 4167% 4168 80 485" 4206* 4219 uS535 u555 
234 uETse ug 4 B6* 4e94 uze4* 4326% 4328 432 4342 4366 4372 4373 
4S0S* 4Siex 4514 4S46% 4SSex 4553 4579% 4588 4590 4593% 44604* 44610% 4611 
ex 4656 47 12% 20% 4633 4946% 9% 72% Sees 6486 6624 630 6731 
6733% peep" 6827% 6840 68 & x 689S* 49 7753 
ae it aw 
$94530 Bb* 6296% 6303 6312% 63178 
32276 61098 38) 
1100 seas 06 707 715 721 722 
os0e 7355* 7357% #73638 
23 612 338 
RaToLe a 62328 
wibeeal 6 S964 5987 $335 6014 6019 6023 6148 6232 6285S 6320 
040154 7201# 7218% 72228 7333 


SEQ O2eS 


FOe2 


12:S8 PAGE 195 


13-DEC-77 
CROSS REFERENCE TABLE 


MACY11 27(6S4) 


| ree 


DMD t 


7789 


SPSfor res Sag gr083d 
=n 

BSE sacs anaes 
Suace enone mmr 


Ld 288 * * 
amu an ~ —Wrur 
lon TwouMuE 
as Dee Nee Sie paras ae 


poeple pada bas +E 


7753 


77S2 


60939 
7749 
1 35% 
ip? 1# 
1828 
96 
ili 
1 
1# 
Fox 
4 
Ht, 
iq 
391 
4027 


x“ « me 


x me 1 
Prk aA ce Zor 7 OyesO 
é Saaegnainss Zo2 eso oars 


6077* 


6394 
6071 
6001 
6093* 
1043. 
ig2oe 
E 

q 
: 
330. 
400 


a 

ow co t& x CRODWOUIK bens! ' oom 

.K wr @ oo a Simeon eae eRe ee NOT OO OR 

3 SS & f Seas RA eE ROS 

Sc 88 2 8 § SiReesaBRope logon; nemteuse 

BSE Ss & RRntnAneseee 
ae a ww “ae “ « DT oD x « 
,- 8 bh be oR ae saeee Fa ch aa 
i] wo or 
$&§ BE R Se Sakae Sremacae 
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4yosex 4Y 4063* 40 4068 4077 407 4O8h* 4 40 4 410, 4110 
Mek] aft Mes mei 4iSix 4157 fox i7E8 4993 W135 4 82, G30F 3195 
21 422 42°29 4279 4287 4295 4322% 4327% 43 4341% 4SES*& 4371 4SO4* 
4513%  4519# 4S* 4551% 4578% 603% 4609 464ie 46S5S* 4711# RIAL de18s 
4uB3ex «0 493ie 4064494Se «4«6SO44e SsoSex S157% S171* Se70* Ses4*e S34S* S433% 5493" 5SS07* 
SS34x SS64* SSsox 5600% 0 640% 5701" 6615* 6620% 6621 6623 6731 
B88 6836 684S* 7749 7753 
| SGET4Y2 030762 € 
SGTsWR 032346 6lelie 7581 
SHiBTs” sate 2igs in 
I0C 3434 & ze 63578 
sien, Saul esis Euge’EaeSy SOR S038 
SINLP 040350 1772 1785 1798 1810 1820 1 1859 1867 1934 1960 1972 
| eC) eS co BS 
4 27 43 59 2471 480 ay 3508 este es7i e573 2578 
| EM 4 Sei5 Sese 40 Ebo4 708 717 1 24 Sl 2763 
277 7 2 SY 285 79 288) e897 2309 2918 9 46 
2 6 9 1 iii 1 134 
314 1 16 1 3631 a3 3633 3260 3330 3346 3354 369 
| i a AP 3650 3703 zi 3366 3732 3604 3818 3831 3578 
see, d?gs «= a?Gé = PB2 P35, «9398 «= 4527855 7886 
SINTAG 001135 247 b143 6238 
SITEMB 001114 2378 P 5368 5987 9 
hue Baarar Babes eaggs ae a4 ne a ee 
OAD 037534 143 4e54 4258 6959 70978 7436 
ScPal 901 108 egast 725 730" @ 1544% 1S54S* 6075* 6091*% 6096 6098 
PE pari io 2358 ese S* 5979 6075 6092* 6098 
SLPW 156 7138 7152 7157 7161 7180 7183 7200 7217 72338 
1226 2978 
1 3018 
Steere else on 
SMAIL 001174 217 221 2708 742 399 5966 6090 6264 
SMAMS1 1224 2918 
Srenes Bolsa 532 
001234 3028 
4 001240 3 
001 217% 
LG 033 6362% 6368 6403* 640748 
SMNEW 033041 6124 62368 
SMSGAD 00121 2778 6378% 6381 
SMSGLG 001212 2788 6383* 
sriecty po1i74 2718 6376 6384* 6396 6400* 
033030 blel 62348 
SMTYP1 OO012e5 2928 
SuTyPe o01231 3008 
TyP3 1235 3038 
| 
| 
| 
| 
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$ee¢ = baat t? 


SSTUP = 177777 


€c ¢ 


CROSS REFERENCE TABLE 


MACYL1 27(654) 13-DEC-77 12:S8 PAGE 197 
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3316 
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50 
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Sl 
Aang 
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| $TESTN 001200 
STIMES 001160 
$TKb 001146 
STKS 001144 
STLKR 040010 
STLKW 037674 
| SiN = O000Se2 
| 
| 
| 
STOUT O4YO444 
$™°8 001152 
STPFLG 00115 
STPS 001150 
STR = OOOOOI 
STRAP. 41242 
STRAP2 041264 
STR = 900013 
TRPAD 041276 
STStM 001004 
STSTNM 001102 
STTYIN 033006 
T = RHRKHRE 
STYPOS 031240 
TYPE 3052 
TYPEC 64 
TYPEX 033332 
STYPOC 031036 
STYpON 031052 
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Peles 


13-DEC-77 
CROSS REFERENCE TABLE 


12:58 PAGE 198 


7s 
75768 
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58238 


Or 
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UWE CELL titer hha 
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Séageumuoue 


eo 

WONW 

Worm 

coo 
se 


‘uNrOrOND 


WoL 
RHoosfw- 
ss 


wis 
NI 


SEQ 0228 


JOe2 


DMDT MACY11 27(6S4) 13-DEC-77 12:58 PAGE 199 
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gives 1012 $8168 7577 

SUNI 1206 e768 

SUNITM 1010 e208 

SUSwR isco 2838 

SUTK 0736 74588 

SVECT1 1244 3088 757 

S$VECTe Rai s36 3098 

SVERsN 00177 6838 4eS6% 4e60% 4eb4* 4699 4747 4860 4973 S086 5199 $325 $335 S404 
S414 5484 S667 $751 6604* 6616 7433 

$XTSTR 032030 48 

S$$GET4= 000000 7798 

SOFILL 031235 817%  S82l*% 5831 S8668 

SYOCAT= x#eexe U 5963 6051 

= 063256 578 618 648 678 698 728 32 1938 195% 1978 * 206% 

2088 2108 2c8s 265 4878 710 24 725 98 77 57748 5787 57888 
$9348 5987 60338 60 6102 31 238 6320 64108 6431 6453 


85508 86168 86208 86218 86228 S86ce38 S86e4%8 S86e5e 86 
OVLS 001514 4868 755% 913% 2253% 2399% eS54S* e691% 2837% 7275 7296 7317 7341 74S9# 


(GASTA= ##eeER U 6362 6365 
= 001000 205s 210 
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DRLPA.P11 CROSS REFERENCE TABL SEQ 0230 
BAHE 81028 98105 81 8111 8114 8117 8120 8123 81688 98171 8174 8177 8180 8183 81 
8189 82348 823 8240 8243 8246 8249 8252 8255 83008 9830 8306 83093 8312 8315 
8318 B21 83668 836 8372 8375 8378 8381 8384 83 84328 8435 8438 8441 8444 
| 4 84 4 84988 8S01 8504 8s0 8510 8513 8516 8519 85648 98567 8570 8573 
8576 8579 esse BS 
COMMEN 1858 
DAAT 41868 4187 
| OFC 33ie 332 344 351 358 365 372 379 386 393 400 414 421 428 435 
DRLT 47e48 4725 4838 4951 5064 5177 
ENDCOM 1858 
| ENDPAS 57308 5749 
ERROR 798 942 1005 1012 1018 1024 1060 1065 1070 1075 1136 1142 1184 1199 1256 
261 1327 1333 13931 140S 1458 1463 1476 1486 1570 1586 1600 1643 166 1676 
| 1767 1777 178 1802 1814 1831 1851 1862 1929 1939 1951 1964 1976 1993 2013 
| 4 2097 2107 2119 2130 2142 2154 2165 2182 2192 2211 2222 2260 2273 2289 
2300 2317 2328 2337 351 2365 2406 2419 2435 2446 2463 2474 2483 2497 2Sil 
| 2552 2565 2581 2592 2620 2629 2643 2657 2698 2711 2727 2738 2755 2766 
2775 2789 2803 2e44 2857 2873 2ssy 2901 12 2921 2938 2949 3001 
3026 3037 3048 3g 70 3081 30 3103 114 3128 313 3148 is9 3170 3200 
0 3222 32 47 64 3325 3334 3346 3358 33 3386 3421 32 np 5? 
3468 3479 3490 3501 3511 3522 3533 3611 3622 3634 3647 3659 3676 96 3706 
3774 3784 3738 3807 4 3834 3881 3897 3908 3988 3936 S 3959 3973 
4013 4024 403 4049 4060 4071 4082 4094 4105 4118 412 4281 4288 4296 323 
433 i343 ? 437 4y 2 4507 4516 4520 447 sss 4580 4594 46 d6i4 4644 
46 46 4713 472: 46 4948 5061 S174 5287 6467 655 6847 689. 6 6993 
7 7047 7074 7188 7205 
ESCAPE 185 
| GETPRI 1858 
| GETSWR 1858 968 
INSTRe 59358 5984 
LOG 41868 4327 4341 4365 4371 4S4S 4550 4578 4S87 4603 4608 4641 46SS 4711 4719 
MOVEI 208 1770 1783 1796 1817 1825 1843 1857 1865 1932 5 1958 1970 1979 
1987 2005 2019 7 g101 113 2125 2136 149 2160 4 2187 2205 2217 2267 
2276 2279 eed 2295 11 32 e331 346 360 ee 3 22 gs eae 457 
409 2477 eu3e S06 =] Sb gs i S76 87 60 61 2be 638 6 705 
714 2717 272: 733 49 BI 6 784 798 2es1 86 2863 2868 79 
| ? 2915 2930 944 2996 0 3020 3032 043 3054 306 3076 87 3109 
3120 3138 3143 1s4 3165 03 16 3229 3241 325 3258 3328 3340 3352 3367 
3380 se? 338 aot 3463 3478 3485 3496 3506 3512 3528 3615 3628 3641 3653 
3313 3931 3888 s4 3 401 #030 404 4055 4066 a85 4089 4100 91i 4124 
MOVEM 198 1755 178 1794 18 a 1840 917 34 956 1958 3 2017 
2031 21ll 3734 2134 214 2ise 2170 1833 185 big 139 2215 4382 Pee 2293 
2309 2340 2344 2353 FA 368 2401 2428 2459 24ss 2486 2490 39 2504 2514 
2547 2574 2ses 2601 632 26 264 2650 2660 2693 729 2731 2747 778 782 
2791 7% 2806 39 BeB 87 283 eae4 928 293 94 2352 985 S00 18 
3030 41 3051 62 es 3095 106 i17 3130 140 3151 ise 3188 361 
3227 3239 3254 3319 33 3350 3363 5 378 3416 3436 3449 3461 3472 3482 
34 3503 3515 3525 355 3558 3563 3566 571 3574 78 sel 3599 3626 36 
3651 3666 3685 3699 3768 3788 3800 3812 3814 3827 3863 3890 390i 3917 3948 
3962 3966 3976 4008 4028 4041 4053 4064 4074 4087 097 Gill 4121 4is4 
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uRoa | 70S 
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PoP eee 
PUSH i828 
REPORT 18Se 
WARN 46708 
R2eD2 B48 
SCOPE 808 
3409 
4678 
DRM 55108 
SETPRI 18S# 
SETTRA 75678 
TUP 1858 
"  agie* 
a74 
11 
3548 
3974 
4368 
4715 
SLASH 1858 
ACE 1858 
STANDE 4S569e 
STARS 18S# 
1533 
2812 
3757 
4380 
4968 
732 
S46 
SUR U 185 
DR 22268 
TOUT 4898 
TRMTRP 75678 
TSTE 86278 
TYPBIN 18Se 
TYPDEC 1858 
TYPNAM 1858 
TYPNUM 1858 
TYPOCS 31s 
TYPOC 1858 
TYPTXT 1858 
7460 
KY 9538 
371 
| 2K 17058 


a3 
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aeze 


6664 
670s 


762 
17068 
2376 


7479 
6743 


1709 
eSee 


7618 
6774 


18688 
2668 


7624 
6779 


1871 
2814 


6961 
203048 
2961 


7018S 
2033 
3272 


7019 
32688 
3392 
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3271 
3716 
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3984 
ay 35308 354 
T ese e2 23748 2376 eSe08 e522 26668 2668 eslee 2814 egsse 2961 33898 3392 35368 
® 3839 39818 3984 41348 nt ES ni ih ud3e 4e988 4300 S34Se 4347 43808 4382 
4Se4s8 45578 4560 46168 461 46708 4 472eSe 8 4728 48388 4841 49518 4954 S064 s 
5067 Si778 8 $180 Se3ie S294 53668 5369 S4S4# S457 
222 255 # oE54 
| SADTS 17058 1867 
CAL. 5 326 
T % 14 
a 72h3 
x 607 612 617 622 627 
SMMAST 308 7914 
SSCMRE 2ee8 
SSCMTM eees 
SShEuT iges 31 3S 41 495 1707 869 2031 2228 2374 2520 2666 281 e9s9 3175 
2 *) g rs goa? 358 713 38 g oe e533 cane cee oces evar 43 4524 4SS8 
SseT 7507n 7878 «7697 77a 7075 = PRBT | 78GS «| 7EGH FEBS «788 


- EQUAT 1s 7S 

- HEADE 318 

- KMADR 178 45S 

-KSIS ees 

- LOADL eSe 7089 

-LPAIN ees 6927 

-PUTCS e4s 75 

- RESET eee 7364 

. SETTR 31ls 

- SETUP 318 703 

- SWRHI 318 43 

- SWRLO S48 

. TRMTR 318 

-UTK ese 8 7448 

-SACT1 318 188 

- SAPT 318 e668 

- SAPTH 318 200 

. TY 318 6358 

- SCATC 3ls 55 

- SCMTA 31s 2ee 

- $0B2D 318 

SeRRO | 31s 8438 
ERRT 3l8 5987 
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C 6 
ABE 368 a 7793 780 781 
819 82 828 8293 830 
867 868 869 870 871 
4455 4466 SS16 $539 S$S3 SS7, 
6138 6147 6277 6348 6375 63 
6736 6767 6823 682 6837 735 
ASL 5008 6161 6162 6163 
608 
ASLB S305 
ASR 6382 
Ee 
Q 4 300 1003 1010 1016 1 
1353 a | ‘ont tose a7 1 
Sc ec 
S363 608 a ES e444 27 
5871 288e 5888 5810 
3079 30 101 31le 3153 31 
3323 3e 344 3356 3 33 
3$31 3548 3$50 3562 38 
378e 37394 80S tint 38 386! 
4022 4035 4047 4 406 4 
4203 4215 ges mitt 4293 4331 
4444 4448 44 44 446") 44 
gs? 4831 4937 4 
S200 S276 5281 Se 5326 
S611 S63 5670 5778 S846 S 
6070 6074 083 18 6145S 6160 
6536 6606 617 66 S39 6691 
7031 7083 116 7236 42 7278 
BGE 6086 
| BGT $745 S8S3 5914 6157 6198 6516 
BHI 7e 
Is 33 6730 
Ic 932 oss 177 1785 7 
302e 34 205 Jel ty 
40e1 4033 404S 40S 
6556 $676 6861 6877 6907 63909 
BICB 6669 469 
BIS 60 1437 4265 4497 4637 4650 
5120 S215 S233 5316 S324 S3e7 
6484 6676 6 pest 6835 6 
BISB 4317 4358 4S3 4$73 4598 463 
at fT 500 sar 
e741 283 388 5 
4003 4146 4148 4 80 4 42 
4405S 0 4423 442 4431 4437 
4688 4690 47 4757 4823 4870 
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BLps bell 6914 


BL = 4 $897 $913 G55 ae 6204 6530 $594 wu, 46 ege : 
RU e ef oe & & eee ee Boas ep 
q276 were 4390 SOT = 803 ees 4710 74 usep «gOS «dette? 
| you ee. s031 037 S033 8097 sivH = S150 e062 s7 $320 
2 1 Paes er id Bite Bia Bie6 itd 2185 1S 2 
eb pa be bu bi oy pl gy Be ie fe Be fe ie 
7005 7018 «= 7014 14 ae 5 6 foe «8258838 CCSEGGC8a SC SGG 52 
| BPL 1389 i403 1974 1883 1660 4364 4510 4543 +654 4718 se¥2 Sess s918 S974 6112 
| é} 6183 9 6308 71 7 74 
ow OF Oe i (3 18 pe me ope pe ps ps 
| 2 6 2193 3335 323 2238 2382 B56 Heb 73 bias «2488 BS12 Bei 2630 
oe ee me Ss i ge gs : 
3660 58 > 3au6 5 41 4119 es? be 
| uae? WP 44 ua a4 usig 4 usar deo ues 4g89 4715 
| 5674 3 75 o7e cee dB 6 dacs(iSietsCé ze egal aes 
| b3b3B re a St gS 8 besi bee e673 P51 p74 B70 6775 235i B89 
| 725 Ze? ; 3 «§3g7— 58 oes s5 5 54 748i 74 page EGR Cea 
CLR 708 42a 752 755 a7HtiéTD 91 4 9 9 9379 10 
| 1] 11781 148 1 Pe a -) 14 4 1444 203 geg f838 
| be ie ie we bo ie i Bs be ig gk be os ge oe 
5ce8 3 38 «Sei8 Seca 3488 326 tac? giat 
205 He yee? «4395431 8 ae y3s9 sa] a4 404 us 4570 
4599 4 “esr 4 4 4 4 4 47 4796 479 48 
So th i me ie me me es 
BB pare 977 70B3 i 7101 «71 fog «7s 889 5852 «= 5868S S88 | SSG SCRE 
cLRE «1085 4e57 Med es 7EG 784 79D B79 BST, yosg S019 01g S105. S123 
CMP 5a 548588 EGE 1662 rt 5 (2 a Cc ree 1847 «1948 
1951 1930 2i04 116 2139 2151 2179 2208 2 23149 «2325 aaa) B32 60 
S023 «Sout, Ss«Sose SOP 5078 3083 $100 311i cit: 3134 at fee 6 Sie? = Seis Bee 
3361 O30 3gu3 eS) 3R78 R83) d4R4S4 Ss 349R 4784 3e88 3809036303631 
3644 3673 3692 3781 3799 «43821 3699 3922 3933 «693958 «©6404 Ss Ne «Ss )S 4079S 4H 
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3071 3184 3201 3314 3778 378 3732 3889 a852 
| ee a a fee ise ie zs 178s dame 
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181 e j 85 fe sed sige 3192 123 297311 ~—Ss«2313 ges oR AS 
ge ge ge ae a By Bd Be gl 83 
es Be PRE ERR EEE gE 
Pee RE See ee eee ee 
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367 0-45 HAY ~ si ay 3365 gepp az 574 2b 3701 03 711 
See erte.teeaeertn 
3681 3804 14 tH 33 .22 3 4091 1 
oy 8h Ge BG GO Gl Gl i il Be Gs ie ie Hue 
s8i6 Meat 4 wiz Wis? M159 MEG 624173 M75 LB gig $273 S346 
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DRLPA.P11 CROSS REFERENCE TABLE SEQ 0237 
707 714 a 7157 a | 7180 7183 7186 7200 7203 7217 7287 7298 7329 7340 | 
737 742 7436 7442 74 7492 7Se7 7534 

MOV 707 711 713 714 715 716 717 18 719 720 724 72S 4 729 730 

7 7 738 7 740 233 748 749 0 757 7s9 766 767 768 771 
77e 773 774 7 776 77 786 787 788 789 793 734 7 7 800 
803 807 808 803 810 814 81S 816 817 8 82e 82 824 
825 826 8 833 834 837 838 839 840 841 842 3 844 84S 8s4 
se kee & Fe eee & & 
Sey Se? S92 1800 1 ; 1014 1020 1062 1067 1092 1247 1316 1384 1395 
133 1409 1431 1443 1472 teas 1544 1203 154 3 16e8 16 1779 7 1820 
1 1835 1845S 1343 1954 4 433 2 3 gid el si2 sigs 5283 
sits 2195 Site 220 at te 31 see car oae so r 3 
Soi2 S0u8 = Shas 5138 iz S608 5084 S28e S517 «S857 aed 0336 70 3388 
3435 3448 347 3433 3514 3854 3624 363 3665 3668 3680 36390 27) 87 1 
a Bs ee oe Bl oe il ee ee ee ee ue he ue ee 
4327 4341 4354 W556 456 4371 4389 390 4 4300 44 Wao 3 44ee 
44, nn > 44 4435 4 444) 4445S 4449 4454 4457 446 44 44 4474 
44 44 44 4y yy wees 44 4513 Sl er 153s 4 455 4569 
4578 «45 4 He 4 46 4 4 1 41 464 464 4555 
4E56 4g 470 47 4705 47 ; 4 oh 4 47st 4761 a5 
4764 4 4 4 4 47734 4 47 47) 4783 47; 47 
4791 4 47 4 es, 4 480 4 Be yBly 4816 481 
4818 (41 wees Ngee BZ Ei 4B? ueey B74 HB 4877 dere 4881 eee 
a) he Be Bh Be i if i i ee 
eas eo0e 2309 S012 5013 1 1 19 ea20 S02 28 
$033 0 200 1 att OS 5058 20 3 2083 
5030 1 1 5 1 1 110 111 11 11 11 1l lel 1 
5125 1g8 1 139 at 1 139 is 14 148 DA 1Se 24>? 
5154 1 156 51 Fa 1 1 7 36 13 14 18 
tM el 23 ese3 1 e 34 7g S239 2508 2533 
ce Be BG Be Be a Ba 
2333 e e m2 She a10 411 4le 41 4 421 4e2 S423 
a5? Sug 5ug3 . 4 S86 133 Bets 440 44 5508 44S 2i8 
Be Bo pe ee oes fe Ee be 
Ps bo ga pu pe ey by fe Ge Ge be fu Ee 
ee Bl Ge “8: : Se eo 
ce ee ee See ee se eB 
SR ams ee a 
oe fg fe at ee ae eS 
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a ae a ne oe 
poll 6614 661 20 2 ePeg o2 pees aa 14 pPee Pray oPas asi pat3 
£708 671 Hat, e723 eves 6 brug bres 6754 6755 peas SQ 760 67 
6812 pene 1} ‘> 2 Hh 681 as pay ped pase a He 
1 4 6303 pee! 1 pais P 1 a4 3 6944 5 
4 ] 7037 7 33 33 7110 7lel 7 714S 146 7149 
ics flee 7ie2 Fie Fey Pais ress PN? Pere Fara 707 roeh fege 7490 
Lang? | 7471 7479 7430 2 Se 7553 7557 7563 7564 75396 75 7605 
MO 77 77 77 1318 1386 13 1468 1473 1551 
et at a 
uaa : 7 GUgQ3 ett 4yS4u6 eTs4 si¢ ents ents epee ore? 2289 4767 
weep 898 i side sles S819 Sear Sa SHl3 SEBE ESR 5687 
a a a a eS 
S; 1 184 seu} 158 xt atti Fry Bios B75 7201 7216 7218 7467 7530 
5 7537 caee 
NOP 1 7053 1054 S738 S781 S782 S783 
ghd 14a 36 S837 5838 6342 6344 6346 
Hl og Be fe Ge fe Ge Ge See see STH SIL BO 
i ee a a , 
TRAP S28 é 7675 Pea $738 7585S 7586 
TST 87 7 uy +] 1 589 1936 1973 22 2127 
21 7 334 16 43 S333 te: 
6 2654 2 3 ce l 4 esl eee 6 198 
510 73 18 1 26} 97. =) , 8 rf 144 61 7 75 2385 
359 e3 se 5a 65 P23 66 1 poee OBE 126 7e gs $e3 
TSTB 131 139 1 1 1322 1558 4291 4319 4338 4361 y 4540 4S76 4601 
asct é 3 IEA e063 eit! gis? 6182 6188 6307 6368 6379 63 70S8 
I 261 $30 909 corse orbs S767 S774 S 232 233 6234 6236 4Ss 6653 
4 $ A ¥4 oa; 01 o0s¢ 7026 eSY4 ay 4gg 7439 75 603 76le 
6 & 4] a ns 765 76893 7666 7671 7676 7681 7686 7695 
7713 7719 77el 2s 735 7764 7786 7793 7797 780 7808 7810 78le 
rece ba 7839 7844 784 7883 7863 7 7871 7873 7876 78793 7888 
ASECT y 
BLKB e241 
BLKW uy ; Bess 7391S Bes 8078 81S4 8220 8286 83S2 8418 BYSY gsso 8616 8620 
avTE ef "Ess "3sz “B58 ae pur ass ash gs ase) pan pale 298 
6407 6408 cane 6591 736 2893 7976 7379 3g8) 988 7991 7994 7 800e 


fie ig 
ae 
see Bae 
ae Bie 
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ORLPA.P11 


*xDRLPA PA/ OOO Aan En RAC, CAL 
eae! : 40 S SECONDS 


SEQ 0245S 


a ——— 


ee ee MICRO CODE ;DEFAULT TITLE MACY11 27(654) 13-DEC-77 13:01 PAGE 1 


xo. SEQ O246 
3 

3 -LIST. MC,BIN,CEX,MEB 

4 -NLIST MD,CNO,ME 

: 177777 ADDRES 

? ; MACRO DEF INITIONS FOR M800 AND M8204 MICR-PROCESSOR 
2 ; INSTRUCTION SET. 

12 ; TO BE USED WITH RSX MACRO-11 ASSEMBLER 

11 : 26-MAY-1976 

le oooooo’ $SBEGIN 

13 000000 $LOC 64000 

14 .GLOBL MRCODE,UCODEE, IMAGE 

1s -ENABL GBL 

i 

1e i SMICRO CODE FOR KMC-11 


a 


oe ee MICRO CODE ;DEFAULT TITLE MACY11 27(654) 13-DEC-77 13:01 PAGE 2 
ORLPXO.P11 SEQ 0247 


xO. 
19 j THIS CODE WILL BE DOWN LOADED INTO BOTH 
20 *KMC-11°S. THE CODE RUNS ASYNCRONOUS TO tHE PDP-11 CODE 
a1 j HE SYNC THROUGH COMMANDS PASSED VIA THE OUT#/IBUS* REGS. | 
gs - 
es 40 IMAGE: ;JUMP TABLE USED FOR COMMANDS 
26 ity BR Per ER iit ;GOTO START 
27 O64000 100407 . WORD $$$. 
28 064002 BR ¢MNOP ;NOP=1 
064002 100420 .WORD .$SS. 
| 30 Ob4004 nrc BR eo ROSILO ;=2 READ SILO PUT IN BSELY 
32 O64006 omen BR ep uso ;=3 READ BSEL4 PUT IN SILO. 
| 33 O64010 anise BR np ROCHND ;=4 READ FAST PATH PUT IN BSELY 
3 Ob4dle ea BR ep WRCHIND ;=S READ BSEL4Y, PUT IN FAST PATH. 
| 38 064014 oF SAMP ;=6 TAKE AN A/D SAMPLE 
3 064014 100440 .WORD .$SS. 
| a START OF U CODED 
43 
44 064016 STARTU: 
45 O64016 0 # c BREG 
46 064016 o00400 .WORD .$$$. 
47 064020 MOVE BREG,OUT1 <O>  ;CLEAR UNIBUS CSRS 
48 Ob4de0 061220 .WORD .$$S. 
4 4022 MOVE BREG,OUT1 <2> 
2? 0640 sagen 10 aReG, our! <3 
52 pe4DS4 061223 ORD .$$S. 
53 064026 MOVE @BREG,OUTI <4> 
54 Ob40e6 061224 .WORD .$S$S. 
5S 0640 MOV *ouTI <5> 
56 4030 061225 a” $35. 
57 4032 MOVE BREG,OUT1 <> 
58 064032 061226 .WORD .$SS. 
59 064034 MOV BREG,OUT1 <7> 
60 4034 061227 . WO .$$S. 
61 4036 MOVE G;SPAD <> 
es 064036 063226 .WORD .S$SS. 
64 O64040 CMNOP: MOVE INPO <12>,0UT1 <O> ;READ STATUS 
65 O64040 021240 .WORD .$SS. 
66 O6404e MOVE # 377,BREG 
67 O64O42 000777 .WORD .$$S. 
68 O64044 MOVE BREG,OUT1 <2>  ;INDICATE READY FOR COMMAND. 
69 064044 061222 .WORD .SSS. 
71 O640O46 LOOP: MOVE INPO <12>,0UT1 <O> ;READ STATUS 
72 O84046 O21240 WORD .$SS. 
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ORLPXO.P11 SEQ 0248 
73 
74 40 MOVE 1h <2>,SPAD <O> ;READ COMMAND REG. 
7S 4 123040 . WORD 
ce | Routes BZ LOOP ;NO COMMAND THEN LOOP 
oe 064 101423 -WORD .3SSS. 
73 =4O0640S4 MOVE INPi <2>,SPAD <O> ;RE-READ COMMAND. 
O0640S4 123040 -WORD .S$SS. 
064056 BR SPAD <0> ;BR BASED ON CMND. 
O640S6 160600 -WORD .S$SS$. 


;NO-USER PROTECTION OFFERED. 
j1F YOU_ENTER WRONG CODE - 
YOU LOSE. 


sours 78 TO READ THE SILO, PUT IN 


*BUS 
CMD= 
064060 RDSILO: hove INPO <10>,O0UT1 <4> ;READ SILO. 
064060 021204 .WORD .$SS. 
;WRITE *BUS 
064062 BR CMNOP + RETURN. 
064062 100420 WORD .$SS. 


} ROUTINE TO WRITE SILO, READ DATA FROM 
BUS REG 4 


ROUTINE TO WRITE FAST ‘a (CMND) REG. 
i TAKE DATA FROM #BUS REG 4 


PUNE ODOT £O- ODS URL GVO DO TO LOM ODD UR Eee 


1 
1 

1 4064 WRSILO: MOV INP1 <4>,OUTO <10> ;READ DATA IN *BUS 
1 atest 122110 MO ORD ies. , 

1 ;WRITE SILO. 

1 064066 BR CMNOP 

i 064066 100420 WORD .$$S. 

1 

1 ROUTINE TO READ FAST PATH (CMND) REG. 

1 snoy IN *BUS REG 4 

1 > CMD=4 

t ; 

1 407 RDCMND: MOV INPO <11>,OUTL <4> ;READ FAST PATH 
1 neta 021224 . WORD NSS. ' 

1 ;WRITE *BUS. 

1 4072 BR CMNOP RETURN 

i 4072 100420 WORD .$$S. 

1 

1 

1 

1 
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DRLPXO.P11 SEQ 0249 


127 ; 

1 

ie O64074 neeene WRCMND : MOVE INP <4) ,QUTO <11> ;READ DATA IN *BUS 

1 7 Cpe s WRITE INTO FAST PATH. 

130 064076 BR CMN ?RETURN. 

133 4076 100420 “WORD .$$S. 

135 

136 

133 THIS We NE TA TAKES AN A/D SAMPLE. 

1 feeb Ae: Leer UP IN ADVANCE. 

ey L 3 US ¢ oa RTAING ac: FoR TIN sess 

14 ie 4 rys BIN WRITE cObe POR 7D CSR 

is ; L 9 Hust cont EMAIN FFEC ED : 

14s : Beet ge Art kOnTATH A/ BNE RBCE ; 

146 :BSEL2 with CONTAIN CODE 377 WHEN DONE. 

148 

156 E4158 opps “Hoe SE 

ey Besibe = PeS8ue ‘ - $33: 

152 064104 MOVE INP1 <6>,OUTO <11> ;SEND A/D WRITE CODE. 

1 41 122151 .WORD .$$S. 

154 0641 WTA i 

Hee Belt 98338 es 

138 4118 MO INP1 <4>,OUTO <11> ;SEND LOW BYTE CSR INFO. 

1 4112 122111 MORO ass: 

1 4114 WTMC 2 

1 4114 020640 .WORD .S$$S. 

161 4116 103046 “WORD .8$S. 

1 dt MOVE i «5>,OUTO <11> ;SEND HIGH BYTE CSR INFO. 

1 4 122131 : 

164 41 WTMC SL 

165 De41ee 020640 .WORD .SSS. 

16 Beale AOVE theT"«7>,ouro «11> ;SEND READ CODE TO GET AD CSR. 
41 122171 ‘ .$$5. 

169 064130 WTMC SAMP 

170 O641 40 $$$. 

12 41 l 4 

v4 4 TMM 1 

17 41 020640 .WORD .$$S. 

174 064136 061620 “WORD .$SS. 

178 Bete — 09 : ino" <11>,BREG 

1 4142 020620 W $$ 

178 Deu 144 MO g, ;SPAD <O> 

1 4144 063220 . WO; $$$. 

180 O64146 WTMM  S§LOOP2 


rr 
Xx 
oo 
Ue 
— 
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EP oP oD DP DP 


PREG OSB VE LOO 
PRRRERRRPRRRERRES LER 


Ps] 


Pe a ee he ee ee ee ee ee 
~N 
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) MICRO CODE ;DEFAULT TITLE MACY11 27(654) 13-DEC-77 13:01 PAGE S 
SEQ O2s0 
46 020640 .WORD .$$S. 
29 061620 ‘WORD .$$S. 
1 3 “WORD .$$S. 
24 020620 MaORD 1S ——— 
BB7 CMNOP ;ABORT IF A/D BIT 15=1 
103420 .WORD .$S$S. 
MOVE SPAD <0>,BREG 
060600 .WORD .$$S. 
103473 BORD toss 
64 BR SLOOP ;IF A/D NOT DONE,EXIT. 
64 100451 .WORD .$$S. 
66 LOPE: MOVE INP <3>,0UTO <11> ; ISSUE READ A/B BUFFER. 
66 122071 .WORD .$$S. 
WTMM SLOOP3 
29 020640 ; . $$$. 
06 1620 ; - $88. 
74 1 74 J - $ . 
MOVE. i <11>,O0UT1 <> 
02 l2e4 . s $s * 
WTMM SLOOPY 
0640 WORD .$$S. 
1 -WORd .$$S. 
1031 “WORD .$55. 
206 MOV; INPO <11>,0UT1 <5> 
06 O21225 Wd . $$$. 
10 BR ¢MNOP 
10 100420 WORD .$$$ 
le 177777 . WORD -l 
000001 “END 


;DEFAULT TITLE MACY11 27(6S4) 


DRLPXO IMAGE) MICRO CODE 
DRLPXO.P11 SYMBOL TABLE 
ADDRES= 177777 CLK = 
LOOP 064046 LOPE 064166 
a ns 
= = 
RDOCMND RBSTLO 4 
Re = Y R3 mes 4 
oop 41 er OOP 4134 
BRCNNO  Be4ae4 BRSILO De4OeS 
-ADD = nine 
-B881 = 00 -BB4 = 003000 
‘Be = 00 . BSBRG= 
° = .cO = DO 
-DEC = 10 .DMEM = 00 
.-DOUTi= 001 . DSPAD= 
.FO = INC = 
-M0 = -OR = 
-SELA = -SELB = 000220 
-SIN1 = 120000 -SMEM = 040000 
.-SUBeC= 000360 -SO = 020 
--LOC = .2A = 000le 


ERRORS DETECTED: 


O0Ge 


0 


CMNOP 064040 
MARHLD= 000 
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IMAGE O64000 G 


PC =% 

Rl 3% 1 
RS =% ‘ 
es, Bile 
uC = £eERRE OG 
ADC 100 
-B80 = 

-BC = 001000 
Bates Bs 
, te 3 409 
eRee= 

-SINO 

. SUBWC= 0 


SE@ 0251 


ORLPXO( IMAGE) MICRO CODE 
ORLPXO.P11 


*DRLPXO, DRLPXO/SOL=DRLPXO 
RUN-TIME: 3 4 O SECONDS 
CORE USED: 6K 


;DEFAULT TITLE 


MACY11 27(6S4) 


13-DEC-77 


13:01 


PAGE 7 


SEQ O0eS2e 


DRLPX1(KMDIAG) MICRO CODE 


ORLPX1.P11 


DIT EWM— OOO VEN LO ODO IO Le ODOVTN LaF OD -IOrU£ wre 


177777 


;DEFAULT TI1LE MACY11 27(654) 13-DEC-77 13:01 PAGE 1 


-LIST. MC,BIN,BEX,MEB 
-NLIST MO,CND,ME 
. REM 


BPE Feo fenent CohPORATION. MAYNARD, MASS. 

THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE 0 

me" TREL'BETONCDF TRE ROOVE COP URTENT Rot feee” rAYe” HiT 
P PROVIDED’ OR OTNERUISE MADE AVAILABLE tO ANY OTHER PERSON 


Doce Wear ee 


INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE 
seh AE EAP ad Bh. CONSTRUED AS A COMMITMENT 
THE 


DEC ASSUMES NO RESPONSIBIL LITY 
OF ITS SOFTWARE ON EQUI Y DEC. 


% 
- REM % 


THIS CODE WAS DEVELOPED FOR USE WITH THE 
LPA-11 DIAGNOSTIC, BY EDWARD C. BADGER. 


% 


On 


ADDRESS=- 
RAGRO.DEFPINITIONS FOR M800 AND M8204 MICR-PROCESSOR 
8 BE wolaiiden MACRO-11 ASSEMBLER 


;THIS Is a “RODIFIED verstoy OF THE MACROS WRITTEN BY W C BROWN 
0 FBR eM S542 Haken br °OF BRANAA: INSTRUCTIONS. 


SBEGIN 


. S8PPBe,ueooee, ore 


;# 
;*#MICRO CODE FOR KMC-11 
KMDIAG: 


Sees es we eses es we 


SEQ 0253 


DRLPX1(KMDIAG) MICRO CODE ;DEFAULT TITLE MACY11 27(654) 13-DEC-77 13:01 PAGE 2 


DRLPX1.P11 SEQ 0254 

S4 
cs :THIS MICRO CODE WILL BE LOADED INTO THE 
36 KCL VIA THE LPA- 1 DIAG. 
2 :ALL TESTS MUST EXECUTED IN ORDER BY THE 
eS F 
60 ; TEST@l 
61 : agar ONES WRITE TESt 
be ; ENTERED ON INIT. 
b4 oe5000 _ TSTl: MOVE # 377,BREG ;GET ALL ONES 
bE Ob page MOV BRE ;OUT1 <O>  ;PUT ALL ONES INTO CRAM 
bE Seite MO BREG,OUT1 <2> 
63 06 061222 NORD . $$$. 
70 065006 MOVE BREG,OUT1 <3> 
7? 061223 .WORD . s: 
7 1 MOVE ;OUT1 <4> 
33 B01 061224 atOBO SSS Airs wa 
75 12 061225 BORD : S$’ 
76 065014 MO G,OUT1 <&> 
77 O85014 061226 MRORD . $$$. 
78 065016 OVE BREG,OUT1 <7> 
23 065016 061227 .WORD .$SS. 
81 06 pana Al: MOVE INP <0>,BREG ;WHEN PDP-11 DONE VERIFICATION 
83 Des S  ielemaeie Bz ao « ;IT WILL CLEAR CARM ADDR. #0. 
B4 502 . $$$. 
86 ;TESt #2 
4 CRAM ZEROS WRITE TEST 
83 ; ENTERED WHEN POP-11 ZEROS CRAM ADDR. 0 
91 Cn 
3¢ 5024 TST2: :GET ZERO 

000400 
Sy Oeste seagate <0>  ;PUT INTO ALL CRAM 

<2> 

: ee eee <3> 
85 e035 061223 
100 5034 <4> 
18g = 061224 
1 <S> 
1 061225 
104 <&> 
Bg Beebae 061226 
1 <7> 
10 061227 
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S0SO 100422 


ee he pe be he pe ps pee Fe Be Pe Be Be pe pe 
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ReReRReRES 

aaa 
TT 
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idatatatatattatatatatata tated tated 

erro Tne 
TL 
-h x 


PREPRRESSO? 
Hith 


DOVE NEW ODDIE LOV-OOBICRE IV SOIT TOV OOOVENEO-ODD - 


6 
588 


103046 


dual quel quel aul oul oul ound ual onal oul avd quel onal aed onal anal onl ol ond] aed eed ened eed ol el ed ood el ed ed eee ey 


Dee ee at be ae as fen Bene ae ee 


o 
~ 
td 
Moo 


Re: 


TST3: 


A3: 


B3: 


MOVE 
. WORD 


BZ 
. WORD 
BR 
. WORD 
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1} <0>,BREG ;GET ZERO 


$35. 
He ;WHEN =377, PDP-11 READY FOR NEXT TEST. 
SSS. 
ITEST 43 
BRANCH TEST 


ENTERED WHEN POP-11 RETURNS 377 TO ADDR. O 


NOTE WE HAVE TO ASSUME as Rig BZ WORK 
OR WE COULON’T HAVE GOT THIS FAR. 
UPON SUCCESSFUL Coe hope OF THIS TESt WE 


PUT Ove NTO CRAM ADOR. 2 
; AND 6 v7 RAN oe 7 ON FAILURE 
;WE ONLY ZERO CRAM ADDR. O. 


b 376, BREG ;GET ZERO BIT O 

T3E ;ERROR IF BR. 

i325, BREG ;BIT 1 =0 
;ERROR IF BR 

i 357, BREG ;BIT 4 =0 

T ;ERROR IF BR 

i127, REG ;BIT 7=0 

T ;ERROR IF BR 

ii GREG ;POSITIVE BR TEST 
;SHOULD BRANCH 

ae ;IF NOT, ERROR 

ice gREG ;BR ON BIT 1 
;SHOULD BR. 

T 7s ;IF NOT, ERROR. 

i 20; BREG ;BR ON BIT 4 

, ;SHOULD BR. 

T3E ;IF NOT, ERROR. 


SEQ 0eSS 


DRLPX1(KMDIAG) MICRO CODE 
ORLPX1.P 


PX1.P11 
162 112 100462 
163 114 
164 114 000600 
165 il 
166 1 103451 
16 1 
168 1 100462 
16 1 
| 170 1 000400 
17 1 
| 12 i 101462 
174 1 000777 
175 130 
176 1 1014S6 
1 132 
1 51 100462 
1 31 
igi e134 061222 
182 5136 
183 51 100462 
184 51 
1 et 000400 
1 14 
1 5i42 061222 
tee beet 
183 Beet da 000400 
191 065146 
192 O65146 061220 
193 
194 
19S 
196 
197 
198 


SO 
50 120400 
25 101467 
S4 
54 100464 
ce 000400 
60 061222 
be 
be 063224 


iatatat tad atatat atta 


Ree eee 
UUW uuu 


WWM O 


ruruoru) 


puree 


;DEFAULT TITLE MACY11 27(654) 13-DEC-77 13:01 PAGE 4 


C3: 


D3: 


E3: 


TST4: 


.WORD .$$S. 
MOVE 8 200, BREG ;BR IF BIT 7 
.WORD .$$S. 

B87 b3 ;SHOULD BR. 

. WORD $s. 

BR T ;IF NOT, ERROR. 
.WORD .S$$S. 

MOVE # 0, BREG ;TEST BZ NEGATIVE 
. WORD sss. 

82 Tt ;ERROR IF BR. 
.WORD .$$S. 

MOVE # 377,B8RCG ;POS BR 

.WORD .$$S. 

BZ E3 ;SHOULD BR 

.WORD .$$S. 

BR T3E ;ERROR IF NOT 

. WORD $$$ 


MOVE ene g. OUT! <2> ;PUT 377 IN OUTPUT REG#2 


$ 
‘7 ;IF BR INSTR FAILS TO wORK, 
-WORD .S$SS. 
MOV 8 
.$ 
BR’ 
§ 


0 gOREG ;THEN A ZERO GETS PUT IN #2 
MO G,OUTL <2>  ;A SIGN OF AN ERROR. 
MORO $: 

MO # 0, BREG sSIGNAL PDP-11 THAT WE ARE 

MpoRD sate ; 

MOVE BSE" ouT1 <O> ; THROUGH BR-TEST. 

.WORD .SSS. 

TEST #4 

: ALU TESt 
: 

: NTERE PDP-11 PUTS A CODE 377 INTO 
; ERAN BD OR 5 

; 2 = 0 IF BAD 

ho INP1 <G>,BREG ;GET CRAM ADDR O 
CORD Tass. : . 

BZ AY ;WHEN = 377 DO TEST. 
.WORD .$$S. 

BK TSTY 

WORD .§$S. 

MO # 0,BREG :GET = 0 

MORO . $$$. 7 

ao “at 

MO BREG,SPAD <4> 

MOORD .$$S. 


SEQ 0256 


2 
x 
- 
vz 
a 
i nl 
3 


SPINNER ES 


rururororurorumrrnn 
DORE Howes 


fururururury 
Ska LOG 
NOUS We 


HH at St 
OOD 


ao 


Maat taal tae att at at atl 


Oo © crorv 


eEsue 


ss 


o” 


o 
£ 


Bea 
RRKEREEERE RMRRR 


BOerr LUVOS 


fu 
o 
wo 


MICRO CODE ;DEFAULT TITLE MACY11 27(654) 13-DEC-77 13:01 PAGE S 


SEQ 0257 
DEC SPaD <4) ;MAKE = 377 
063164 -WORD .$$$.!.DSPAD 
B2 BY ;BR IF GOOD SEC. 
101475 .WORD .$$S. 
BR Ty 
100503 .WORD .$$S. 
B4: pEC SPAC <4> ;SEC = 376 
063164 .WORD .$$$.!.DSPAD 
INC SPAD <4> ;INC = 377 
063064 .WORD .$$$.!.DSPAD 
BZ c4 ;BR IF = 377 
101501 .WORD .$SS. 
BR THE 
100503 .WORD .$ $, 
C4: MOV # 377,BREG 
000777 . WO . $35. 
MOVE  BREG,OUT1 <2> ;RETURN GOOD CODE 
061222 .WORD .S$SS. 
TYE: MOVE # 0,BREG ;RETURN CODE 0 
000400 .WORD .$$$. 
MOVE BREG,OUT1 <O> 
061220 .WORD .$SS: 
TESt S 
NPR TEST 


ERA ADDR. re WHEN PDP-11 PUTS CODE 377 INTO 
INPUT DATA Oy FROM LOC 1124 


om ee RO Bata CHECKING Pic RETURNS 


CRAM ADDR. O WHEN DONE. 


TSTS: MOVE INP. <0>,BREG ;WAIT FOR POP-11 
120400 gifoRD 
101510 gifoRD iE 
100505 . WORD 
AS: MOVE ' 2, BREG ;SET TO DO NPR IN 
= HOVEL abe: OUTO <S> SET HIGH ADDR 
062225 MO ORD , , 
MOVE 124, BREG ;GET LOW ADDR. OF ADOR. 1124 
oo0s24 . WORD aie 
MOVE BREG,OUTO <4>  ;SET LOW ADDR. 
062224 .WORD .$$S. 
MOVE # 1,BREG ;SET TO mPR IN 
000401 WORD .38$. 


DRLPX1(KMDIAG) MICKO CODE 
ORLPX1.P1l 


270 
e71 


Hs 


275 


rururu 
N 
iN 


SERRE GROSSE SRR EORS Bae SRE RR ao 


ee eh 
WN OWONOWULCW-O 


ot 12 9? tenant ate anf at etd 


061230 
120600 
102116 


020400 
Ob2222 
020420 
062223 
oo040e 
062227 
oo0S26 
062226 
123224 
063264 


;DEFAULT TITLE 


BS: 


CS: 


MACY11 27(654) 13-DEC-77 13:01 PAGE 6& 


:TEST 6 
’ 


BREG,OUT1 <10> ;CAUSE NPR IN 
Thye4 «10>, BREG ;WAIT FOR NPR DONE. 


85 
$$$. 

INPO <0>,BREG ;GET LOW BYTE DATA. 
BREG,OUTO <2>  ;OUTPUT NPR DATA REG. 
in “<¢1>,BREG ;GET HIGH BYTE. 

egg, 70 <3>  ;SAVE FOR OUTPUT. 


# 2, BREG ;GET OUTPUT ADDR. = 1126 
BREG, ouTO <?> 

# , BREG ;LOW PART 

BREG, OUTO <6> 

INP1'<11>,SPAD <4> ;7-STN- 

SBAQ” <> , BREG, SPAD 


BREG 


ss -OUTI <11>—* 
® 21,BREG 


BREG, OUTI <10> ;SET NPR OUT. 





i <10>,BREG ;WAIT TILL DONE 


Cc 
- $$$. 


* : BREG ;TELL PDP-11 WE’RE DONE. 
ae § ours <O> 
. $$$. 


NPR TEST 
ENTERED IN LINE WHEN PDP-11 PUTS CODE 377 INTO 


SEQ 0258 


ee eins) MICRO CODE ;DEFAULT TITLE MACY11 27(654) 13-DEC-77 13:01 PAGE 7 


SEQ 0259 
324 3 CRAM ADDR. O. 
3es ; DOES AN INPUT pare XFER_ FROM LOC 1124 
258 ; N -11 MEM TO 10C 1126 
3e ; OES NO DATA CHECKING RETURNS 
; CODE 0 TO CRAM ADDR. O WHEN DONe. 


TST6: MOVE | <0>,BREG ;WAIT FOR POP-11 


Be 306 120400 . WORD 
06531 B2 
065310 101546 .WORD .$$S. 
Ob531¢ BR TST6 
le 100543 .WORD .$SS. 
065314 Ab: MOVE # 2,BREG ;SET TO DO NPR IN 
065314 oo00402 .WORD .$$$. 
Ob5316 MOVE BREG,OUTO <S>»  ;SET HIGH ADDR. 
5316 062225 . WORD init 


nov # 124,BreG ;GET LOW ADDR. OF ADDR. 1124 
MO BREG.OUTO <4> ;SET LOW ADDR. 

MORO | Sse" ; 

BREG ;SET TO NPR IN 


oo ee 
iy 


OVE BREG,OUT1 <10> ;CAUSE NPR IN 
BE: HOVE TNE <10> , BREG ;WAIT FOR NPR DONE. 
102154 BORO SSS. 
ae MOVE INPO <O>,BREG ;GET LOW BYTE DATA. 
aa eee MOVE G,OUTO <2>  ;QUTPUT NPR DATA REG. 


.$$S. 
MOVE INPO <1>,BREG ;GET HIGH BYTE. 
*OUTO <3> ;SAVE FOR OUTPUT. 


RRR AMAIA AS Aaa Hor ATM uu Rae eRe R RAM Nnin inIy 
Fitatad 
2 
ef 
my & 
oo 
55 


. $$$ 
065. MO # 2, BREG ;GET OUTPUT ADDR. = 1126 
oo00402 ORD . $$$. 
MO ;OUTO <7> 
062227 . $$$. 
MOV & , BREG ;LOW PART 
Babe —— MO rig “OUTO <&> 
06 062226 TO ORD Ss : 
065354 MO I <11>,SPAD <> ;7-STN- 
Of 354 123224 Wd . $35. 
<4> , BREG, SPAD 
Ob 356 063264 WORD .S$S. 
MOVE # 0,BREG 
065360 000400 $$$. 
5362 OR SPAD <4>,BREG, BREG 
065362 060704 WORD .$$$. 


ORLPX1(KMDIAG) MICRO CODE 
ORLPX1.P11 


WwW 
o = 


06S364 
4 061231 


oo04el 
061230 


te 
ae 


Ze 120600 
102175 


SRR TeReeS 


Sse 
2 8 
4 

a 3 


aah 065376 000400 
393 065400 061220 


S 
336 
397 
3398 
339 
400 
401 
402 
403 
: 
do? besos 120400 
Se EI saison 
410 O65406 
411 O68S406 100601 
415 S41 
414 S410 1232 
uP Bee ames 
ai? 065414 
418 065414 000600 
Be BEELIE  cxor0s 
et el 
42e peause 061231 
423 S422 
424 peaiss 120620 
425 S424 
us? O6S4e4 103611 
428 S426 
4e9 besuse 000400 
430 065430 
431 065430 061220 


Cb: 


TST?: 


A7: 


B7: 


;DEFAULT TITLE MACY11 27(654) 13-DEC-77 13:01 PAGE 8 


BREG,OUTI1 <11> ;SET NPR OUT. 
# 21,BREG 

$35. 

BREG, OUT1 <10> 

. $$$. 

INP1 <10>,BREG ;WAIT TILL DONE 
a$ss. 

“Ess. 

# 0,BREG ; TELL PDP-11 WE’RE DONE. 
BREG,OUT1 <O> 

. $$$. 


INTERRUPT TESt 

THIS TESt GENERATES TWO INTERRUPTS 
THE 1ST IN RRUPT ,* VECTOR XX0O WHEN 
CRAM POP-11 a en 
THE 2ND_INT T TO ‘VECTOR X X4_ WHEN 
CRAM ADDR. o's = 377 (1ST MODE = O AGAIN). 


1 <0>,BREG ;WAIT TILL POP-11 READY! 


INPL <1, SPAD <4 
oy See, are 

2 , BREG 

SPAD <4>,BREG, BREG 

are, QUT1 <11> ;SET INTR TO ADOR. XxO 
INP I <11>,BREG ;WAIT TILL DONE 


8 
.$$S. 

" BREG ;TELL POP-11 WE INTERRUPTED 
BREG, OUT: <0>  ;IN CASE WE DIDN’T 


SEQ 0260 


ORLPX1 (KMDIAG) 


ORLPX1. 


Pll 


MICRO CODE 


120400 
101620 
100615 


123224 
063264 
000700 
060704 
061231 


120620 
103625 


000400 
061220 


100631 


177777 
000001 


;DEFAULT TITLE MACY11 27(654) 13-DEC-77 13:01 PAGE 9 


C7: 


D?: 


E?: 


. WORD 


MOVE 
. WORD 


BZ 
. WORD 
BR 
. WORD 


"ao 
RD 


MOVE 


INP1 <0>,BREG ;NOW WAIT FOR PDP-11 TO tELL 
eRe 5US TO iNTR. TO VECTOR Xx4 


i338 <11>,SPAD <4 
eo ”<¢4> , BREG, SPAD 
# 300, BREG 


SPA ”<4>, BREG, BREG 
BREG, OUT! (11> ;SET INTR TO ADDR. Xx4 


INP1 <11>,BREG ;WAIT TILL DONE. 
.$$S. 


£7 
$$$. 

# 0, BREG ; TELL PDP-11 WE THOUGHT 
BREG, OUT1 <0>  ;WE HAD INTERRUPTED! 


SEQ 0261 


PX1(KMDIAG) ye CORE ;DEFAULT TITLE MACY11 27(654) 13-DEC-77 13:01 PAGE 10 
LPX1.Pil YMBOL LE 


aa nes= Age ree A Bee8s8 
B3 065106 Bd 


SEQ 0262 


: 
7 x 
i 
ge 
Be 


i 


aor 
4440 


es 
BE 


+ = 
wun 
WWW 
4 
Wee 
o 
uM 
be 
44 
— 


8 
ae 
- Wunnzne 
Co 
ae 
OO 
3 =z 





o0e 


} 
| 


| ERRORS DETECTED: 0 


TRANSFER 
Ly LIMIT 


pee et pine MICRO CODE 
ORLPX1.P 


FUN=T ine 3B 80 SECONDS 


W322 ooo000 
LNKX11 v02e3 


13-DEC-77 13:01 


;DEFAULT TITLE MACY11 27(6S4) 


SDRLPA.LDA/B: 0, DRLPA.MAP=DRLPA, DRLPXO, ORLPX1/E 


LOAD MAP 
IDENT: LPA.O3 

 PODRESS: 000001 
HIGH LIMIT: oposo00 


mstistirs 


SECTION ENTRY 
«. ABS.> 





> 
HHHRARRREE 


MODULE PXxO 
SECTION ENTRY 09008 si 
<ABCODE> 


RHERRERERE 


Sectio pa ext 

SEC a NTRY ADDRESS SIZE 
004000 000000 

seeneneces 


UNDEFINED REFERENCES 


ADDRESS SIZE 
000000 000000 


13-DEC-77 


13:01 


PAGE 11 


SEQ 0263 


EG@DRORIMEASEG SECONDS 


00010000 


780223 


POP1O 411 


